
Time bar (total: 36.0s)
| 1× | search |
| Probability | Valid | Unknown | Precondition | Infinite | Domain | Can't | Iter |
|---|---|---|---|---|---|---|---|
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 0 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 1 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 2 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 3 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 4 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 5 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 6 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 7 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 8 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 9 |
| 0.0% | 0.0% | 99.8% | 0.2% | 0.0% | 0.0% | 0.0% | 10 |
| 0.6% | 0.6% | 99.2% | 0.2% | 0.0% | 0.0% | 0.0% | 11 |
| 0.7% | 0.7% | 99.1% | 0.2% | 0.0% | 0.0% | 0.0% | 12 |
Compiled 171 to 45 computations (73.7% saved)
| 2.7s | 2 791× | 1 | valid |
| 2.6s | 1 152× | 2 | valid |
| 1.5s | 4 152× | 0 | valid |
| 393.0ms | 161× | 3 | valid |
| 29.0ms | 78× | 0 | invalid |
adjust: 1.5s (24.3% of total)ival-pow2: 1.5s (23.3% of total)ival-cosu: 845.0ms (13.5% of total)ival-sinu: 727.0ms (11.6% of total)ival-mult!: 546.0ms (8.7% of total)ival-div!: 545.0ms (8.7% of total)ival-sub!: 222.0ms (3.6% of total)ival-add!: 143.0ms (2.3% of total)ival-sqrt: 142.0ms (2.3% of total)ival-atan: 106.0ms (1.7% of total)ival-pi: 0.0ms (0.0% of total)Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 452 | 3593 |
| 1 | 2185 | 3573 |
| 1× | node-limit |
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 18.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(abs a)
(abs b)
Compiled 338 to 90 computations (73.4% saved)
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 2472 | 102039 |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
(/.f64 angle #s(literal 180 binary64)) |
(PI.f64) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
#s(literal 2 binary64) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
b |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
y-scale |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
x-scale |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
(pow.f64 b #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) |
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) |
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| Outputs |
|---|
#s(approx a a) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale)) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow a 2) (pow.f64 a #s(literal 2 binary64))) |
#s(approx (- (pow b 2) (pow a 2)) (pow.f64 b #s(literal 2 binary64))) |
#s(approx (- (pow b 2) (pow a 2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale)) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))) |
#s(approx b b) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (- (pow b 2) (pow a 2)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx angle angle) |
#s(approx (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle)) |
#s(approx (* (/ angle 180) (PI)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64)) |
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 #s(literal -1/64800 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) |
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (PI.f64))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64)))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64)))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))) |
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/15427944806400000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) x-scale))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 x-scale y-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))))))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))) angle)) |
#s(approx (cos (* (/ angle 180) (PI))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (sin (* (/ angle 180) (PI))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) y-scale)) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale)) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) x-scale))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 x-scale y-scale)))) |
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx x-scale x-scale) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) x-scale)) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx y-scale y-scale) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) y-scale)) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
15 calls:
| Time | Variable | Point |
|---|---|---|
| 41.0ms | b | 0 |
| 38.0ms | angle | 0 |
| 37.0ms | angle | inf |
| 31.0ms | a | 0 |
| 27.0ms | a | inf |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 45 | 1503 |
| 0 | 83 | 1503 |
| 1 | 407 | 1503 |
| 2 | 2020 | 1398 |
| 0 | 5078 | 1392 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
(/.f64 angle #s(literal 180 binary64)) |
(PI.f64) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
#s(literal 2 binary64) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
b |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
y-scale |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
x-scale |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
(pow.f64 b #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))) |
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) |
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| Outputs |
|---|
#s(literal 180 binary64) |
a |
angle |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 (neg.f64 angle) #s(literal -1/180 binary64)) |
(*.f64 angle #s(literal 1/180 binary64)) |
(/.f64 (neg.f64 (*.f64 angle #s(literal 1 binary64))) #s(literal -180 binary64)) |
(/.f64 (neg.f64 (neg.f64 (neg.f64 angle))) #s(literal -180 binary64)) |
(/.f64 (*.f64 angle #s(literal 1 binary64)) #s(literal 180 binary64)) |
(/.f64 (neg.f64 (neg.f64 angle)) #s(literal 180 binary64)) |
(/.f64 (neg.f64 angle) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -180 binary64) (neg.f64 angle))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) angle)) |
(/.f64 angle #s(literal 180 binary64)) |
(neg.f64 (/.f64 angle #s(literal -180 binary64))) |
(PI.f64) |
(*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64))) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (log.f64 (exp.f64 (PI.f64)))) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))) |
(*.f64 angle (/.f64 (PI.f64) #s(literal 180 binary64))) |
(/.f64 (neg.f64 (*.f64 (PI.f64) (neg.f64 angle))) #s(literal 180 binary64)) |
(/.f64 (neg.f64 (*.f64 (neg.f64 angle) (PI.f64))) #s(literal 180 binary64)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (PI.f64) angle))) #s(literal 180 binary64)) |
(/.f64 (*.f64 (PI.f64) (neg.f64 angle)) #s(literal -180 binary64)) |
(/.f64 (*.f64 (neg.f64 angle) (PI.f64)) #s(literal -180 binary64)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) |
(log.f64 (exp.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (neg.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(-.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(cos.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle)))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (*.f64 (neg.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(cos.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (sin.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) |
(*.f64 a (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(134-z0z1z2z3z4 a (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
#s(literal 2 binary64) |
(*.f64 (fabs.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (fabs.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)))) |
(*.f64 (neg.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)))) |
(*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)))) |
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) a) |
(*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) a) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 a (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 a (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(pow.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 2 binary64)) |
(/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal -1 binary64))) |
(134-z0z1z2z3z4 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) a) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(fabs.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) #s(literal 2 binary64))) |
b |
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) |
(*.f64 b (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)))) |
(*.f64 (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)))) |
(*.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)))) |
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) b) |
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) b) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 b (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(*.f64 b (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(pow.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 2 binary64)) |
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal -1 binary64))) |
(fabs.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))))) |
(neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) |
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) |
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) |
y-scale |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) |
(*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) y-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (neg.f64 y-scale) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (*.f64 (neg.f64 y-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (*.f64 y-scale (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (*.f64 y-scale (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 y-scale)) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) y-scale) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale)) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale))) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (*.f64 y-scale (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) y-scale) |
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (fabs.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (fabs.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (fabs.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (fabs.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) a (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) a (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) a) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) a) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) b (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) b) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 b (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) b (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 a (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 a (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) a (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) a (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale))) |
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale))) |
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) y-scale)) |
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale)) |
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) |
(*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale)) |
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) y-scale) |
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) |
(/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (neg.f64 (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 y-scale) y-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) |
(/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) y-scale) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) |
(neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) y-scale) y-scale)) |
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 y-scale y-scale))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) |
(*.f64 a (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)))) |
(*.f64 (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)))) |
(*.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)))) |
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) a) |
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) a) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 a (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 a (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(pow.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) #s(literal 2 binary64)) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 2 binary64)) |
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal -1 binary64))) |
(fabs.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) #s(literal 2 binary64))) |
(*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) |
(134-z0z1z2z3z4 b (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(*.f64 (fabs.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (fabs.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 (neg.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 (neg.f64 (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 (*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) b) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) b) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) |
(*.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 1 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 1 binary64)) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 b (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(pow.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64)) |
(/.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 1 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal -1 binary64))) |
(134-z0z1z2z3z4 (*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) b) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(fabs.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) |
(exp.f64 (*.f64 (log.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))))) |
(neg.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) |
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) |
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) |
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) |
x-scale |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) |
(*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) x-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (neg.f64 x-scale) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (*.f64 (neg.f64 x-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (*.f64 x-scale (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) x-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (*.f64 x-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 x-scale)) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) x-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) x-scale) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale)) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale)) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (*.f64 x-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)))) (*.f64 x-scale x-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) x-scale) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (fabs.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (fabs.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (fabs.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) b) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) b (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) a (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) a (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) a) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) a) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (fabs.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 a (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 a (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) b (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 b (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) a (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) a (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale))) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale))) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) x-scale)) |
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale)) |
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) |
(*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64))) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) x-scale) |
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) |
(/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (neg.f64 (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 x-scale) x-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) |
(/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) x-scale) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) |
(neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale)))) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) x-scale) x-scale) (/.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) x-scale) x-scale)) |
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 x-scale x-scale))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 x-scale (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 x-scale (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (*.f64 x-scale (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 x-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 x-scale)) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 x-scale (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 x-scale (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 x-scale (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 x-scale (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 x-scale (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 (neg.f64 x-scale))) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 x-scale (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (*.f64 x-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) x-scale) (*.f64 y-scale (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 y-scale (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 y-scale (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) (neg.f64 x-scale)) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 y-scale (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 y-scale (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 y-scale (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 y-scale (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) (neg.f64 (neg.f64 x-scale))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (*.f64 y-scale (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) x-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) x-scale) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (neg.f64 x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (neg.f64 (neg.f64 x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) x-scale) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 y-scale y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (neg.f64 x-scale)) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (neg.f64 (neg.f64 x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) x-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 y-scale y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) x-scale) (*.f64 (neg.f64 y-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 (neg.f64 y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (neg.f64 y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (neg.f64 y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (neg.f64 y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 y-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (neg.f64 (neg.f64 x-scale))) (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (neg.f64 y-scale) (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) x-scale) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (neg.f64 x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) x-scale) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) x-scale) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) x-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (neg.f64 x-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) x-scale) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) x-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 y-scale)) x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 x-scale)) (*.f64 (neg.f64 (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 (neg.f64 x-scale))) (*.f64 (neg.f64 (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (neg.f64 (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (neg.f64 (neg.f64 y-scale)) x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (neg.f64 y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (neg.f64 (neg.f64 y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 y-scale (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 y-scale (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 y-scale (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 y-scale (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 y-scale (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 y-scale (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 (neg.f64 x-scale))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (*.f64 y-scale (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 y-scale y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (neg.f64 x-scale) x-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (neg.f64 x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) y-scale)) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale))))) (neg.f64 (*.f64 (neg.f64 y-scale) (neg.f64 x-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) x-scale) (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)))) (neg.f64 (*.f64 (neg.f64 y-scale) x-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 x-scale)) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale))))) (neg.f64 (*.f64 y-scale (neg.f64 x-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale))))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) x-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) y-scale) x-scale) |
(/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale)) y-scale) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale))) (neg.f64 x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 (neg.f64 y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) x-scale) (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (neg.f64 y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (neg.f64 x-scale)) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 y-scale (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 y-scale y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) y-scale) |
(/.f64 (neg.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (neg.f64 x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (neg.f64 y-scale)) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) x-scale) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (*.f64 x-scale y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)))) |
(neg.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale y-scale))) |
(-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) y-scale) (*.f64 y-scale (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 y-scale (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 y-scale (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (*.f64 y-scale y-scale)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 y-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (neg.f64 y-scale)) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 y-scale (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 y-scale (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 y-scale (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 y-scale (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 y-scale (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (neg.f64 (neg.f64 y-scale))) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 y-scale (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) y-scale) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (*.f64 y-scale y-scale)) (*.f64 y-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 y-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) y-scale) (*.f64 x-scale (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 x-scale (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 x-scale (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) (neg.f64 y-scale)) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 x-scale (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 x-scale (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 x-scale (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 x-scale (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 x-scale (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) (neg.f64 (neg.f64 y-scale))) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 x-scale (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) (*.f64 x-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) y-scale) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (neg.f64 y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (neg.f64 (neg.f64 y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) y-scale) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (neg.f64 y-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (neg.f64 (neg.f64 y-scale))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 x-scale x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) y-scale) (*.f64 (neg.f64 x-scale) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 (neg.f64 x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (neg.f64 x-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (neg.f64 x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (neg.f64 x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (neg.f64 x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (neg.f64 (neg.f64 y-scale))) (*.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (neg.f64 x-scale) (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (neg.f64 y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 (neg.f64 x-scale) x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) y-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (neg.f64 (neg.f64 y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) y-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 (neg.f64 (neg.f64 x-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 x-scale)) y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (neg.f64 (neg.f64 x-scale)) (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (neg.f64 x-scale)) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 y-scale)) (*.f64 (neg.f64 (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 (neg.f64 y-scale))) (*.f64 (neg.f64 (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 (neg.f64 (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (neg.f64 (neg.f64 x-scale)) y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (neg.f64 x-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (neg.f64 (neg.f64 x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 x-scale (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 x-scale (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 x-scale (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 x-scale (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 x-scale (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 x-scale (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 (neg.f64 y-scale))) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 x-scale (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) #s(literal 1 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 (neg.f64 y-scale) y-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (neg.f64 y-scale))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) x-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale))))) (neg.f64 (*.f64 (neg.f64 x-scale) (neg.f64 y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) y-scale) (*.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (neg.f64 (*.f64 (neg.f64 x-scale) y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (neg.f64 (*.f64 (neg.f64 x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 y-scale)) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale))))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale))))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)))) (neg.f64 x-scale)) |
(/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) x-scale) y-scale) |
(/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) x-scale) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale))) (neg.f64 y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) |
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 (neg.f64 x-scale) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) y-scale) (*.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (neg.f64 x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (neg.f64 x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (neg.f64 y-scale)) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 x-scale (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 x-scale x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale))) x-scale) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) y-scale) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) (neg.f64 x-scale)) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))))) |
(neg.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 x-scale y-scale))) |
(-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale)))) |
(*.f64 (fabs.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (fabs.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))) |
(*.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (neg.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(pow.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) |
(pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) |
(pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) #s(literal 2 binary64))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(/.f64 (neg.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) y-scale) |
(/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (*.f64 x-scale y-scale)) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) y-scale) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (-.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))) |
(/.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)))) (*.f64 y-scale (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale)) |
(/.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal -1 binary64))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale)) |
(neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) |
(neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) |
(-.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) |
(-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) |
(fabs.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) |
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))))) |
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) |
(+.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale)))))) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(+.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b))) |
(*.f64 (fabs.f64 b) (fabs.f64 b)) |
(*.f64 (neg.f64 b) (neg.f64 b)) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) b) |
(*.f64 (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 b b) |
(pow.f64 (fabs.f64 b) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 b) #s(literal 2 binary64)) |
(pow.f64 b #s(literal 2 binary64)) |
(/.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal -1 binary64))) |
(fabs.f64 (*.f64 b b)) |
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(*.f64 (fabs.f64 a) (fabs.f64 a)) |
(*.f64 (neg.f64 a) (neg.f64 a)) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 binary64))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) a) |
(*.f64 (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 a a) |
(pow.f64 (fabs.f64 a) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 a) #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
(/.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal -1 binary64))) |
(fabs.f64 (*.f64 a a)) |
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a) a) (*.f64 b b))) (*.f64 b b)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))) (*.f64 b b)) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 (neg.f64 a) a))) (-.f64 (*.f64 b b) (*.f64 (neg.f64 a) a))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (*.f64 (neg.f64 a) a)) (*.f64 (*.f64 b b) (*.f64 (neg.f64 a) a))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 a a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 a a))))) |
(neg.f64 (*.f64 (+.f64 a b) (-.f64 a b))) |
(-.f64 (*.f64 b b) (neg.f64 (*.f64 (neg.f64 a) a))) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(+.f64 (*.f64 (neg.f64 a) a) (*.f64 b b)) |
(+.f64 (*.f64 b b) (*.f64 (neg.f64 a) a)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (+.f64 b a) (-.f64 b a))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (-.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (-.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b a a) |
(neg.f64 (*.f64 (*.f64 (+.f64 a b) (-.f64 a b)) #s(literal 2 binary64))) |
(neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 a b) (-.f64 a b)))) |
(neg.f64 (+.f64 (*.f64 (+.f64 a b) (-.f64 a b)) (*.f64 (+.f64 a b) (-.f64 a b)))) |
(-.f64 (+.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 b b)) (*.f64 a a)) |
(-.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 a b) (-.f64 a b))) |
(-.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(+.f64 (+.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 b b)) (*.f64 (neg.f64 a) a)) |
(+.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 a) a))) |
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(+.f64 (*.f64 (*.f64 b b) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a) a) #s(literal 2 binary64))) |
(+.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) |
(+.f64 (*.f64 b b) (+.f64 (*.f64 (neg.f64 a) a) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64)) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) a a) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 b) (fabs.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 b) (fabs.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 b) (fabs.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 b) (neg.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 b) (neg.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 b) (neg.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) b b (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) b b (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) b b (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) b b a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a) (-.f64 b a) (+.f64 a b) (-.f64 a b)) |
(+.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64))) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (+.f64 b a) (-.f64 b a) (+.f64 a b) (-.f64 a b)) |
(134-z0z1z2z3z4 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale)) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 #s(literal 1 binary64) x-scale))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) x-scale)) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 #s(literal 1 binary64) x-scale))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) x-scale)) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 1 binary64))) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) (neg.f64 (neg.f64 (neg.f64 x-scale)))) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 1 binary64)) x-scale) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x-scale) (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) |
(neg.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) x-scale) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) y-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) y-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) |
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale)) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale) y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) #s(literal 1 binary64))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 x-scale) y-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) #s(literal 1 binary64)) y-scale) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale)) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale)) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (neg.f64 (*.f64 (neg.f64 x-scale) y-scale))) |
(/.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (neg.f64 (neg.f64 (neg.f64 y-scale)))) |
(/.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 (neg.f64 x-scale) y-scale)) |
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) y-scale) |
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) |
(neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) |
(*.f64 (fabs.f64 (fabs.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) (fabs.f64 (fabs.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))))) |
(*.f64 (neg.f64 (fabs.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) (neg.f64 (fabs.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) y-scale) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) y-scale) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) y-scale) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) x-scale) y-scale) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (fabs.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (fabs.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(pow.f64 (fabs.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)) |
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))) #s(literal 2 binary64)) |
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale))) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale))) (neg.f64 (*.f64 y-scale (neg.f64 y-scale)))) |
(/.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) #s(literal 2 binary64))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) (neg.f64 y-scale)) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) y-scale) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 x-scale y-scale)) |
(/.f64 (*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale)) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) y-scale) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale)) |
(/.f64 (*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) (*.f64 (neg.f64 y-scale) y-scale)) |
(/.f64 (*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) (*.f64 y-scale (neg.f64 y-scale))) |
(/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale))) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) (*.f64 (*.f64 x-scale y-scale) y-scale)) |
(/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(fabs.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(*.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) |
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(pow.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)) |
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) |
(/.f64 (+.f64 (pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (*.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))) |
(neg.f64 (-.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) |
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (neg.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) |
(sqrt.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(fabs.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(fabs.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(+.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(+.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) |
(+.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) |
(+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))) |
(+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(*.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(fabs.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) |
(/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(neg.f64 (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(neg.f64 (-.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) |
(-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(+.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(+.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) |
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 x-scale y-scale)) |
(*.f64 (/.f64 (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) (neg.f64 y-scale)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) |
(*.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) y-scale) |
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(*.f64 (-.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(*.f64 y-scale (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) y-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale) y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) (neg.f64 (/.f64 #s(literal 1 binary64) y-scale))) |
(/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)) |
(/.f64 (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) (*.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(/.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(/.f64 (-.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))) (-.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) |
(neg.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) |
(neg.f64 (/.f64 (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(neg.f64 (-.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) |
(-.f64 (/.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)))) |
(-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))) |
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (neg.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) |
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 x-scale y-scale))))) |
(neg.f64 (atan.f64 (*.f64 (-.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) |
(neg.f64 (atan.f64 (/.f64 (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))))) |
(neg.f64 (atan.f64 (-.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) |
(atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(*.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64)))) |
(*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 1 binary64))) (neg.f64 (PI.f64))) |
(/.f64 (neg.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (neg.f64 (cbrt.f64 (PI.f64)))) |
(/.f64 (neg.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (neg.f64 (neg.f64 (neg.f64 (PI.f64))))) |
(/.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 1 binary64)) (PI.f64)) |
(/.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (PI.f64)) (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (PI.f64)) |
(neg.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (PI.f64)))) |
(neg.f64 (/.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 (/.f64 #s(literal 180 binary64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (cbrt.f64 (PI.f64)))) |
(*.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (*.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 180 binary64))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 180 binary64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (neg.f64 (cbrt.f64 (PI.f64)))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 180 binary64)))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 180 binary64)) (neg.f64 (PI.f64))) |
(/.f64 (/.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 180 binary64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (PI.f64))) |
(/.f64 (neg.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 180 binary64))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 180 binary64)) (PI.f64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 (atan.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 180 binary64)))) |
| 2.4s | 40 943× | 0 | valid |
| 620.0ms | 10 513× | 0 | invalid |
Compiled 377 874 to 18 223 computations (95.2% saved)
ival-mult!: 797.0ms (75.0% of total)ival-sub!: 195.0ms (18.3% of total)adjust: 71.0ms (6.7% of total)34 alts after pruning (33 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 442 | 33 | 1 475 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | -1 | 1 | 0 |
| Total | 1 442 | 34 | 1 476 |
| Status | Accuracy | Program |
|---|---|---|
| 18.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 18.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| ✓ | 18.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 12.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 #s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 #s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 9.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))) y-scale) #s(literal 2 binary64))))) (/.f64 #s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))) y-scale))) (PI.f64))) | |
| ▶ | 17.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) (PI.f64))) |
| 14.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))))) (PI.f64))) | |
| 15.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 8.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| ▶ | 17.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 14.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 17.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 18.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 #s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 #s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 12.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 #s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 #s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 13.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) x-scale) y-scale))) (PI.f64))) | |
| 16.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale))) (PI.f64))) | |
| 17.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 14.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 12.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale)))) (PI.f64))) | |
| 2.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 14.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| ▶ | 11.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 5.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 20.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 19.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 18.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) y-scale)) (PI.f64))) | |
| 0.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))))))))) (PI.f64))) | |
| ▶ | 13.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
| 6.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))) | |
| 2.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| ▶ | 23.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
| 21.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))) | |
| 21.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
| 43.0ms | 794× | 0 | valid |
| 14.0ms | 230× | 0 | invalid |
Compiled 19 813 to 4 891 computations (75.3% saved)
ival-mult!: 15.0ms (76.3% of total)ival-sub!: 3.0ms (15.3% of total)adjust: 1.0ms (5.1% of total)Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 7811 | 292532 |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 2 binary64) |
(pow.f64 a #s(literal 2 binary64)) |
#s(literal 1/180 binary64) |
(PI.f64) |
(*.f64 angle (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(pow.f64 b #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
#s(literal 90 binary64) |
(pow.f64 y-scale #s(literal 2 binary64)) |
(/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) |
(pow.f64 x-scale #s(literal 2 binary64)) |
(/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) |
(-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
(pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) |
(-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
(*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
(*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
(*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
(/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(/.f64 angle #s(literal 180 binary64)) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) |
(*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
(+.f64 b a) |
(-.f64 b a) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 x-scale y-scale) |
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) |
(pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))) |
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) |
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale)))) |
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) |
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) (PI.f64))) |
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) |
#s(literal 4 binary64) |
(pow.f64 b #s(literal 4 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) |
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) |
(-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
(pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
(-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
(atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
(/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| Outputs |
|---|
#s(approx a a) |
#s(approx (pow a 2) (pow.f64 a #s(literal 2 binary64))) |
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))) |
#s(approx (- (pow b 2) (pow a 2)) (pow.f64 b #s(literal 2 binary64))) |
#s(approx (- (pow b 2) (pow a 2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64)))) |
#s(approx (/ (pow a 2) (pow y-scale 2)) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (PI.f64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale)) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (/.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (/.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ b a) b) |
#s(approx (+ b a) (+.f64 a b)) |
#s(approx (- b a) (+.f64 b (*.f64 #s(literal -1 binary64) a))) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) b))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 a (+.f64 b (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1 binary64) b)))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (* (+ b a) (- b a)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (* (* (+ b a) (- b a)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) (+.f64 b (*.f64 #s(literal -1 binary64) b))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 x-scale y-scale))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 a (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 a (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 a (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 a (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 a (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 a (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (PI.f64)))) |
#s(approx (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (PI.f64)))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (PI.f64)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (PI.f64))) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale)) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale))))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ b a) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a)))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) |
#s(approx (- b a) (*.f64 a (-.f64 (/.f64 b a) #s(literal 1 binary64)))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) (/.f64 b a)) #s(literal 1 binary64)))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) (+.f64 (/.f64 b a) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1 binary64)))) |
#s(approx (* (* (+ b a) (- b a)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) #s(literal 2 binary64)))) |
#s(approx (* (* (+ b a) (- b a)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 x-scale y-scale))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)))))) |
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64))))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) #s(literal 1 binary64)))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a)))) a)) #s(literal 1 binary64)))) |
#s(approx (* (* (+ b a) (- b a)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) #s(literal 2 binary64)))) |
#s(approx (* (* (+ b a) (- b a)) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a)) (*.f64 #s(literal 2 binary64) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a)) #s(literal 2 binary64)))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 x-scale y-scale))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 x-scale y-scale)))) a))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) a)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) a)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 a (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) a))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 a (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) a))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 a (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) a)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) a)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 #s(literal 2 binary64) b)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (pow.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a))))))))) |
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (pow.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (pow.f64 (-.f64 b (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a)))))))) (PI.f64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))) |
#s(approx (- (pow b 2) (pow a 2)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (/.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (/.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (- b a) (-.f64 b a)) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 a (*.f64 #s(literal -1 binary64) a))))) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) a)))))) |
#s(approx (* (* (+ b a) (- b a)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) |
#s(approx (* (* (+ b a) (- b a)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) b) (*.f64 #s(literal 2 binary64) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 x-scale y-scale))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale y-scale))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 b (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 b (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 b (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 b (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 b (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
#s(approx (pow b 4) (pow.f64 b #s(literal 4 binary64))) |
#s(approx (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64)))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (PI.f64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale)))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ b a) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b)))) |
#s(approx (- b a) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (/.f64 a b))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 a b)))))) |
#s(approx (* (* (+ b a) (- b a)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) b))))) |
#s(approx (* (* (+ b a) (- b a)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) b)))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale y-scale))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale y-scale)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 b #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64))))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (/.f64 a b) #s(literal 1 binary64))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 a (*.f64 #s(literal -1 binary64) a))) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)) b))))) |
#s(approx (* (* (+ b a) (- b a)) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b))) b))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 x-scale y-scale))))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) b)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) b)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 b (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) b))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 b (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) b))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) b)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 b (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) b)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) b))) b)) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) a)))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (atan.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (pow.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b))))))))) |
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (pow.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (pow.f64 (-.f64 a (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b)))))))) (PI.f64)))) |
#s(approx angle angle) |
#s(approx (* angle (PI)) (*.f64 angle (PI.f64))) |
#s(approx (* 1/180 (* angle (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) |
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) |
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))))))))))) |
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) |
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))) angle)) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle)) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 #s(literal -1/64800 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (PI.f64))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64)))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64)))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 a #s(literal 4 binary64))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/15427944806400000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) x-scale))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 x-scale y-scale)))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))))))))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))))))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))) |
#s(approx (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))) |
#s(approx (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))))))))))))) |
#s(approx (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 angle (PI.f64)) (*.f64 x-scale y-scale)))) |
#s(approx (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale)))))))) |
#s(approx (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale)))))))))))) |
#s(approx (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))))))))))))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale y-scale)))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale)))))))))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))))))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))))) angle)) |
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) |
#s(approx (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))) |
#s(approx (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))))))))))) |
#s(approx (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) |
#s(approx (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) |
#s(approx (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
#s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) y-scale)) |
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale)) |
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (/ (sqrt (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 2)) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) x-scale))) |
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 x-scale y-scale)))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) |
#s(approx (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) |
#s(approx (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale y-scale)))) |
#s(approx (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx x-scale x-scale) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) x-scale)) |
#s(approx (pow x-scale 2) (pow.f64 x-scale #s(literal 2 binary64))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 y-scale (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) x-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) x-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 y-scale (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) x-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) x-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) x-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) x-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) x-scale)) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (* x-scale y-scale) (*.f64 x-scale y-scale)) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) x-scale)) |
#s(approx (* (pow x-scale 2) (pow y-scale 2)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx y-scale y-scale) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) y-scale)) |
#s(approx (pow y-scale 2) (pow.f64 y-scale #s(literal 2 binary64))) |
#s(approx (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) y-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) y-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) y-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) y-scale)) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) y-scale)) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale))) 2)))) (* (* (* (+ b a) (- b a)) 2) (/ (* (sin (* (PI) (* 1/180 angle))) (cos (* (PI) (* 1/180 angle)))) (* x-scale y-scale)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
15 calls:
| Time | Variable | Point |
|---|---|---|
| 837.0ms | x-scale | 0 |
| 79.0ms | angle | 0 |
| 71.0ms | a | -inf |
| 62.0ms | b | inf |
| 55.0ms | b | -inf |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 168 | 7344 |
| 0 | 292 | 7096 |
| 1 | 1323 | 7040 |
| 0 | 4047 | 6827 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 2 binary64) |
(pow.f64 a #s(literal 2 binary64)) |
#s(literal 1/180 binary64) |
(PI.f64) |
(*.f64 angle (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(pow.f64 b #s(literal 2 binary64)) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
#s(literal 90 binary64) |
(pow.f64 y-scale #s(literal 2 binary64)) |
(/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) |
(pow.f64 x-scale #s(literal 2 binary64)) |
(/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) |
(-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
(pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) |
(-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
(*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
(*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
(*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
(/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(/.f64 angle #s(literal 180 binary64)) |
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) |
(*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
(+.f64 b a) |
(-.f64 b a) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 x-scale y-scale) |
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) |
(pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)) |
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))) |
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) |
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale)))) |
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) |
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) (PI.f64))) |
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) |
#s(literal 4 binary64) |
(pow.f64 b #s(literal 4 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) |
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) |
(-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
(pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
(-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
(atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
(/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| Outputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 2 binary64) |
(*.f64 (fabs.f64 a) (fabs.f64 a)) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 binary64))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) a) |
(*.f64 (neg.f64 a) (neg.f64 a)) |
(*.f64 (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 a a) |
(pow.f64 a #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) |
#s(literal 1/180 binary64) |
(PI.f64) |
(*.f64 (PI.f64) angle) |
(*.f64 angle (PI.f64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle)) |
(*.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) angle) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 b) (fabs.f64 b)) |
(*.f64 (neg.f64 b) (neg.f64 b)) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) b) |
(*.f64 (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 b b) |
(pow.f64 b #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(*.f64 (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) |
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))))) (*.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))))) (-.f64 (*.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a) (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 2 binary64))) |
(+.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (sqrt.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1/2 binary64))) |
(pow.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64))) |
(fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(fabs.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64))) (-.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64))) (-.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64))) (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64))) (-.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))))) |
(/.f64 (-.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))))) |
(/.f64 (+.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))))) |
(-.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) |
(+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(+.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))))) (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale))) (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) |
(*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) |
(*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) (*.f64 (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) (-.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (-.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) #s(literal 3 binary64)) (pow.f64 (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) (-.f64 (*.f64 (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (*.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))))) |
(+.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(+.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a a)) (*.f64 b b))) (*.f64 b b)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))) (*.f64 b b)) |
(*.f64 (-.f64 b a) (+.f64 b a)) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a)))) (-.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 a a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 a a))))) |
(neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (-.f64 b a) (+.f64 b a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b b a a) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (-.f64 b a) (+.f64 b a))) |
(*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) b b a a) |
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) |
(*.f64 x-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale)) |
(*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale x-scale)) |
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(*.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(/.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(+.f64 (/.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(+.f64 (/.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale)) |
(*.f64 (/.f64 #s(literal -1/2 binary64) x-scale) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale))) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) |
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (PI.f64)) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (PI.f64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))))) |
#s(literal 90 binary64) |
(*.f64 (fabs.f64 y-scale) (fabs.f64 y-scale)) |
(*.f64 (pow.f64 y-scale #s(literal 1 binary64)) (pow.f64 y-scale #s(literal 1 binary64))) |
(*.f64 (pow.f64 y-scale #s(literal 1 binary64)) y-scale) |
(*.f64 (pow.f64 y-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 y-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 y-scale) (neg.f64 y-scale)) |
(*.f64 y-scale y-scale) |
(pow.f64 y-scale #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))) |
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale)) |
(*.f64 (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 a a))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 a a)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(*.f64 (fabs.f64 x-scale) (fabs.f64 x-scale)) |
(*.f64 (pow.f64 x-scale #s(literal 1 binary64)) (pow.f64 x-scale #s(literal 1 binary64))) |
(*.f64 (pow.f64 x-scale #s(literal 1 binary64)) x-scale) |
(*.f64 (pow.f64 x-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 x-scale) (neg.f64 x-scale)) |
(*.f64 x-scale x-scale) |
(pow.f64 x-scale #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64))) |
(*.f64 (/.f64 b x-scale) (/.f64 b x-scale)) |
(*.f64 (neg.f64 (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 b b))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (*.f64 b b)) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 b b)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale y-scale))) (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 a a)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 a a))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a)) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))))) |
(neg.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(-.f64 (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))))) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) |
(*.f64 (neg.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (neg.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (-.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a)) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a)) (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 a y-scale) (/.f64 a y-scale) (/.f64 b x-scale) (/.f64 b x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 a y-scale) (/.f64 a y-scale) (neg.f64 (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 a y-scale) (/.f64 a y-scale) (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (/.f64 b x-scale) (/.f64 b x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (neg.f64 (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 b x-scale) (/.f64 b x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 b x-scale) (/.f64 b x-scale) (/.f64 a y-scale) (/.f64 a y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 b x-scale) (/.f64 b x-scale) (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 b x-scale) (/.f64 b x-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 a y-scale) (/.f64 a y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 b b)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 a y-scale) (/.f64 a y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(exp.f64 (*.f64 (log.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) |
(+.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(*.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (sqrt.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (sqrt.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64))) |
(pow.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)) |
(sqrt.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) |
(fabs.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(fabs.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(*.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) |
(/.f64 (-.f64 (pow.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (-.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (pow.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)))) |
(-.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (neg.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(+.f64 (/.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (+.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) |
(neg.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(+.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) |
(*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) |
(*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) |
(134-z0z1z2z3z4 y-scale (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 y-scale (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 y-scale (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) |
(*.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) x-scale) |
(*.f64 x-scale (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale)) |
(134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (*.f64 x-scale y-scale) (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)) |
(*.f64 (PI.f64) (*.f64 (-.f64 b a) (+.f64 b a))) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (PI.f64) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) b b a a) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)) angle) |
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))) |
(*.f64 angle (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b a a) |
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle)) |
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (PI.f64) angle)) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 (*.f64 x-scale y-scale) angle) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)))) |
(*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (PI.f64) angle)) (/.f64 x-scale (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)))) |
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle)) |
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)))) |
(*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle)) |
(*.f64 (/.f64 x-scale angle) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)))) |
(*.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) |
(*.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)) (neg.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) |
(/.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) |
(/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)) |
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) angle)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 #s(literal 90 binary64) angle) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64)))) |
(*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)) |
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 (neg.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))) |
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (PI.f64)) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))))) |
(*.f64 (neg.f64 angle) #s(literal -1/180 binary64)) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 angle #s(literal 1/180 binary64)) |
(/.f64 (neg.f64 (neg.f64 angle)) #s(literal 180 binary64)) |
(/.f64 (neg.f64 angle) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -180 binary64) (neg.f64 angle))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) angle)) |
(/.f64 angle #s(literal 180 binary64)) |
(*.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) angle) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) |
(*.f64 a (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) #s(literal 2 binary64))) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) |
(*.f64 b (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale)) |
(*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) y-scale)) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) y-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) y-scale) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (*.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale)) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale))) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (*.f64 y-scale (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) |
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale)) |
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (/.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) y-scale)) |
(+.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale)) |
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale)) |
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (neg.f64 y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) |
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) y-scale) |
(/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) |
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) y-scale) y-scale)) |
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) |
(+.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 y-scale y-scale))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) |
(*.f64 a (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) #s(literal 2 binary64))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) |
(*.f64 b (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) |
(*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale)) |
(*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) x-scale)) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) x-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) x-scale) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale)) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale)) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale)) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale)) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (*.f64 x-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x-scale) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) x-scale)) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) x-scale)) |
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale)) |
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale)) |
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (neg.f64 x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) |
(/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) x-scale) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) x-scale) x-scale) (/.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) x-scale) x-scale)) |
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) |
(+.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 x-scale x-scale))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) x-scale) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) (neg.f64 x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)))) (*.f64 (neg.f64 y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) x-scale) (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) (*.f64 (neg.f64 y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (neg.f64 x-scale)) (*.f64 y-scale (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)))) (*.f64 y-scale (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (neg.f64 x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) (*.f64 (*.f64 y-scale y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) x-scale) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) x-scale) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) x-scale) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))) (*.f64 x-scale y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) x-scale) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale))))) |
(neg.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) x-scale) x-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) x-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 y-scale (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (*.f64 x-scale y-scale))) |
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (neg.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) (*.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64)))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a) (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(134-z0z1z2z3z4 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 2 binary64))) |
(+.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 1/2 binary64))) |
(pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64))) |
(fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(fabs.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) |
(fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))))) |
(/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))))) |
(neg.f64 (-.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) |
(-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) |
(+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (-.f64 b a) (+.f64 b a))) |
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 b a) (+.f64 b a))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) (-.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (-.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b a a) |
(+.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) |
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x-scale) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) |
(*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) y-scale)) |
(*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)) |
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale)) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64)) (*.f64 x-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (neg.f64 y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) y-scale) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 x-scale y-scale)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) y-scale) |
(*.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (+.f64 (*.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(-.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (/.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64)))) |
(*.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (PI.f64)) (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (cbrt.f64 (PI.f64)))) |
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (neg.f64 y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) (*.f64 (neg.f64 x-scale) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) y-scale) (*.f64 (neg.f64 x-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (*.f64 (neg.f64 x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 x-scale) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 (neg.f64 x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (neg.f64 y-scale)) (*.f64 x-scale (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) (*.f64 x-scale (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (neg.f64 y-scale)) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 y-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 x-scale x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) y-scale) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (*.f64 x-scale y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))))) |
(neg.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (*.f64 x-scale y-scale))) |
(-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) |
(*.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (fabs.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) |
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) (*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (-.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) (-.f64 (*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) (*.f64 y-scale (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale)) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) y-scale) (*.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale))) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(exp.f64 (*.f64 (log.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) |
(+.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 b a)) a) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 a) b)) b) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b) |
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)) |
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 b b) (*.f64 a b)))) |
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 a a) (*.f64 b (neg.f64 a))))) |
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b a)))) |
(/.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (-.f64 b a)) |
(-.f64 b (neg.f64 a)) |
(+.f64 b a) |
(+.f64 a b) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 a) b)) b) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 a b)) b) |
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b (neg.f64 a))))) |
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 a a) (*.f64 b a)))) |
(/.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (+.f64 b a)) |
(neg.f64 (-.f64 a b)) |
(-.f64 b a) |
(+.f64 b (neg.f64 a)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a a)) (*.f64 b b))) (*.f64 b b)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))) (*.f64 b b)) |
(*.f64 (-.f64 b a) (+.f64 b a)) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a)))) (-.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 a a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 a a))))) |
(neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (-.f64 b a) (+.f64 b a))) |
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 b a) (+.f64 b a))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) (-.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (-.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))))) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 #s(literal 2 binary64) b b a a) |
(+.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) |
(*.f64 (neg.f64 angle) #s(literal -1/180 binary64)) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 angle #s(literal 1/180 binary64)) |
(/.f64 (neg.f64 (neg.f64 angle)) #s(literal 180 binary64)) |
(/.f64 (neg.f64 angle) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -180 binary64) (neg.f64 angle))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) angle)) |
(/.f64 angle #s(literal 180 binary64)) |
(*.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) angle) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(*.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 1/2 binary64)) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(+.f64 (/.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 x-scale y-scale) |
(*.f64 y-scale x-scale) |
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale)) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) y-scale) |
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 x-scale y-scale)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 x-scale y-scale)) |
(*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) y-scale)) |
(*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)) |
(*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))))) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale)) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64)) (*.f64 x-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (neg.f64 y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) y-scale) |
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 x-scale y-scale)) |
(*.f64 (fabs.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (fabs.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))) |
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (*.f64 (neg.f64 y-scale) y-scale)) |
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))) (*.f64 y-scale (neg.f64 y-scale))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 y-scale (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale)) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (*.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
(-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (neg.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
(+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(fabs.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(neg.f64 (-.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))))) |
(-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))))) |
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) y-scale) |
(*.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(/.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))))) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(/.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (neg.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(-.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (/.f64 (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64)))) |
(*.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (PI.f64)) (neg.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (cbrt.f64 (PI.f64)))) |
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale)) |
(*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale)) |
(*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale)) |
(*.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 y-scale y-scale)) |
#s(literal 4 binary64) |
(*.f64 (pow.f64 b (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 b (/.f64 #s(literal 4 binary64) #s(literal 2 binary64)))) |
(pow.f64 b #s(literal 4 binary64)) |
(exp.f64 (*.f64 (log.f64 b) #s(literal 4 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64))) |
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(*.f64 (pow.f64 (*.f64 x-scale y-scale) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 x-scale y-scale) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (pow.f64 (*.f64 x-scale y-scale) #s(literal 1 binary64)) (pow.f64 (*.f64 x-scale y-scale) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 x-scale y-scale) #s(literal 1 binary64)) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) |
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64))) |
(*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale))) |
(*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale))) |
(*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 y-scale y-scale))) |
(*.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) |
(*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) |
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale)) |
(*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) |
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale)) |
(*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) |
(/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 x-scale x-scale)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))))))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))))) |
(neg.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) |
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) |
(+.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))))) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) |
(*.f64 (fabs.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) (fabs.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))))) |
(*.f64 (neg.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) (neg.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))))) |
(*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 1 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) |
(*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) |
(*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) |
(pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) (*.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (-.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))))) (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) x-scale) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) x-scale) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) x-scale) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) y-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) y-scale) (/.f64 (*.f64 b b) y-scale)) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 y-scale y-scale)))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(134-z0z1z2z3z4 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) |
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) |
(+.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) |
(/.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (*.f64 (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (+.f64 (*.f64 (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (-.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) |
(+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) |
(+.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) |
(*.f64 (pow.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) |
(sqrt.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) |
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) |
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) |
(fabs.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) |
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) |
(*.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))))) |
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))) (-.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) |
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) |
(-.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) |
(+.f64 (/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) |
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) |
(+.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (neg.f64 (*.f64 x-scale x-scale))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))))) |
(neg.f64 (-.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))))) |
(-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))) |
(-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) |
(+.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (neg.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) |
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) |
(*.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) y-scale) |
(*.f64 (neg.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (neg.f64 (neg.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(/.f64 (neg.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (neg.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))))) |
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (neg.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64)))) |
(*.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (PI.f64)) (neg.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (cbrt.f64 (PI.f64)))) |
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64)) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) |
| 1.5s | 24 314× | 0 | valid |
| 1.2s | 18 902× | 0 | invalid |
| 4.0ms | 48× | 1 | valid |
Compiled 943 375 to 33 568 computations (96.4% saved)
ival-mult!: 654.0ms (75.0% of total)ival-sub!: 146.0ms (16.7% of total)adjust: 72.0ms (8.3% of total)61 alts after pruning (61 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 2 896 | 59 | 2 955 |
| Fresh | 26 | 2 | 28 |
| Picked | 5 | 0 | 5 |
| Done | 1 | 0 | 1 |
| Total | 2 928 | 61 | 2 989 |
| Status | Accuracy | Program |
|---|---|---|
| 10.6% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64)) | |
| 13.4% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) | |
| 25.3% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (PI.f64)) | |
| 25.2% | (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))))) | |
| 17.3% | (*.f64 (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) #s(literal 180 binary64)) | |
| 25.2% | (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) | |
| 24.8% | (*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) | |
| 25.3% | (*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64))) | |
| 17.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 #s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 14.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 12.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) (PI.f64))) | |
| 19.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 22.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) | |
| 12.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| ▶ | 12.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) (PI.f64))) |
| 13.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) | |
| 23.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 14.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) | |
| 26.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale)))) (PI.f64))) | |
| 13.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) | |
| 5.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 5.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 17.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 14.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 4.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 24.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 28.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| ▶ | 8.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
| 23.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 28.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 24.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 13.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) | |
| 10.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) | |
| 12.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) | |
| ▶ | 14.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
| 7.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) | |
| 24.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 11.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 22.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 24.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (PI.f64))) | |
| 22.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) | |
| 23.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 #s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 25.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 24.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 18.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 27.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale x-scale))))) (PI.f64))) | |
| ▶ | 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
| ▶ | 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| 18.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64))) | |
| 1.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) | |
| 6.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) | |
| 14.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) | |
| 40.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) | |
| 40.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 23.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
| 44.0ms | 812× | 0 | invalid |
| 9.0ms | 180× | 0 | valid |
| 3.0ms | 32× | 1 | valid |
Compiled 31 054 to 9 572 computations (69.2% saved)
ival-mult!: 13.0ms (71.9% of total)ival-sub!: 3.0ms (16.6% of total)adjust: 2.0ms (11.1% of total)Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 7435 | 272053 |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 1/180 binary64) |
(PI.f64) |
(*.f64 angle (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(literal 4 binary64) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) |
#s(literal 2 binary64) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
#s(literal 90 binary64) |
(*.f64 a a) |
(*.f64 y-scale y-scale) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(*.f64 b b) |
(*.f64 x-scale x-scale) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) |
(*.f64 (PI.f64) angle) |
(-.f64 b a) |
(+.f64 b a) |
(*.f64 (-.f64 b a) (+.f64 b a)) |
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))) |
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(pow.f64 a #s(literal 2 binary64)) |
(pow.f64 a #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 a #s(literal 4 binary64))) |
(-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
(*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) |
(pow.f64 b #s(literal 2 binary64)) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
(/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) |
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(*.f64 x-scale y-scale) |
(*.f64 (-.f64 b a) #s(literal 2 binary64)) |
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) |
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) |
(neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) |
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(/.f64 (atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) (PI.f64))) |
| Outputs |
|---|
#s(approx a a) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64)))) |
#s(approx (* a a) (pow.f64 a #s(literal 2 binary64))) |
#s(approx (/ (* a a) (* y-scale y-scale)) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale))) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))) |
#s(approx (- b a) b) |
#s(approx (- b a) (+.f64 b (*.f64 #s(literal -1 binary64) a))) |
#s(approx (+ b a) (+.f64 a b)) |
#s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))) |
#s(approx (* (- b a) (+ b a)) (+.f64 (*.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) b))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (- b a) (+ b a)) (+.f64 (*.f64 a (+.f64 b (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1 binary64) b)))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (+.f64 (*.f64 a (*.f64 angle (*.f64 (PI.f64) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 angle (PI.f64)))) (*.f64 angle (*.f64 (PI.f64) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 a (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (-.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64)))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (-.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64)))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 a (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (*.f64 a (+.f64 (*.f64 #s(literal -90 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))))))) |
#s(approx (pow a 4) (pow.f64 a #s(literal 4 binary64))) |
#s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (- (pow b 2) (pow a 2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (PI.f64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 y-scale (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 y-scale (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 y-scale (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (* (- b a) 2) (*.f64 #s(literal 2 binary64) b)) |
#s(approx (* (- b a) 2) (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) b))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (+ b a) (* (- b a) 2)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (* (+ b a) (* (- b a) 2)) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) a) (*.f64 #s(literal 2 binary64) (+.f64 b (*.f64 #s(literal -1 binary64) b))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 a (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))) |
#s(approx (fabs (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (fabs (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (* y-scale y-scale)) (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 a (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 x-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))))))) |
#s(approx (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI)) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (PI.f64)))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) y-scale)))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) |
#s(approx (- b a) (*.f64 a (-.f64 (/.f64 b a) #s(literal 1 binary64)))) |
#s(approx (+ b a) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a)))) |
#s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (- b a) (+ b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) (/.f64 b a)) #s(literal 1 binary64)))) |
#s(approx (* (- b a) (+ b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) (+.f64 (/.f64 b a) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1 binary64)))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (PI.f64))) (/.f64 (*.f64 angle (*.f64 (PI.f64) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a)))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 angle (*.f64 (PI.f64) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) a)) (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 b (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (PI.f64))) (+.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 3 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 b (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (pow.f64 a #s(literal 3 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) (+.f64 (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (PI.f64)))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (PI.f64)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (PI.f64))) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a)))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a)))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 3 binary64)))))))) |
#s(approx (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* (- b a) 2) (*.f64 #s(literal -2 binary64) a)) |
#s(approx (* (- b a) 2) (*.f64 a (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 b a)) #s(literal 2 binary64)))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) #s(literal 2 binary64)))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) #s(literal 2 binary64)))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (fabs (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (fabs (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (* y-scale y-scale)) (/.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 x-scale y-scale))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 3 binary64)))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI)) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (PI.f64)))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))) |
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64))))) |
#s(approx (* (- b a) (+ b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) #s(literal 1 binary64)))) |
#s(approx (* (- b a) (+ b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a)))) a)) #s(literal 1 binary64)))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a))))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))) a)) (*.f64 angle (*.f64 (PI.f64) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) a))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (/.f64 b (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (PI.f64))) (+.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) a)) (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (PI.f64))) (+.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))) a)) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) a))) (+.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 b (*.f64 angle (*.f64 y-scale (PI.f64)))))) a)) (/.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a)) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) a)))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64))))))) a)) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a)) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) a)))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a))) a)))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 angle (*.f64 y-scale (PI.f64))))) a))) a))) a)))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) a)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) a)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) a))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (/.f64 (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) a)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (- b a) 2) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 b a)))))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) #s(literal 2 binary64)))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a)) (*.f64 #s(literal 2 binary64) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a)) #s(literal 2 binary64)))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) a)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) a))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) a)) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) a))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 a (*.f64 x-scale y-scale))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (*.f64 x-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 x-scale y-scale)))) a))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 a (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a)))))))))) |
#s(approx (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI)) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a))))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) a)) (-.f64 b (*.f64 #s(literal -1 binary64) a))))))))) (PI.f64)))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (- b a) (-.f64 b a)) |
#s(approx (* (- b a) (+ b a)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 a (*.f64 #s(literal -1 binary64) a))))) |
#s(approx (* (- b a) (+ b a)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) a)))))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (*.f64 angle (*.f64 b (*.f64 (PI.f64) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (*.f64 b (+.f64 (*.f64 angle (*.f64 b (PI.f64))) (*.f64 angle (*.f64 (PI.f64) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (+.f64 (*.f64 #s(literal -90 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (+.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (- (pow b 2) (pow a 2)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (+.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (+.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (* (+ b a) (* (- b a) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 b (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) |
#s(approx (* (+ b a) (* (- b a) 2)) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) b) (*.f64 #s(literal 2 binary64) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (+.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 x-scale y-scale))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 b (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale y-scale))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64)))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (- b a) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b))))) |
#s(approx (+ b a) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b)))) |
#s(approx (* (- b a) (+ b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (/.f64 a b))))) |
#s(approx (* (- b a) (+ b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 a b)))))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 angle (PI.f64)) (/.f64 (*.f64 angle (*.f64 (PI.f64) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) b)))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 angle (PI.f64)) (/.f64 (*.f64 angle (*.f64 (PI.f64) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) b))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (PI.f64))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (PI.f64))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (PI) (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (PI.f64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (PI.f64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))) b)))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))) b))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) b)))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) b))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 3 binary64)))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))))))) |
#s(approx (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* (- b a) 2) (*.f64 b (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 a b))))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) b))))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) b)))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))) b))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))) b)))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) b))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) b)))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (fabs (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (fabs (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (* y-scale y-scale)) (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale y-scale))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 b (*.f64 x-scale y-scale)))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 3 binary64)))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI)) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (PI.f64)))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (/.f64 a b) #s(literal 1 binary64))))) |
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64))))) |
#s(approx (* (- b a) (+ b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 a (*.f64 #s(literal -1 binary64) a))) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)) b))))) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 (PI.f64) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))) b)) b)) (*.f64 angle (PI.f64))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 b (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))) b)))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))) b))) b))) b)))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 b (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))))) b)))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 x-scale (PI.f64)))))) b))) b))) b)))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))) b))) b)))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (*.f64 #s(literal -90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 x-scale (PI.f64)))))) b))) b))) b)))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) b)) b))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) b)) b)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) b)) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (- b a) 2) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 a b)) #s(literal 2 binary64))))) |
#s(approx (* (+ b a) (* (- b a) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) b))) b))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) b))) b)) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) b))) b)) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 x-scale y-scale))))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) b)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) b)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b)))))))))) |
#s(approx (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI)) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b))))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) b)) (-.f64 a (*.f64 #s(literal -1 binary64) b))))))))) (PI.f64)))) |
#s(approx angle angle) |
#s(approx (* angle (PI)) (*.f64 angle (PI.f64))) |
#s(approx (* 1/180 (* angle (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64)) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))))))))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 #s(literal 2 binary64) y-scale)) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) y-scale))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (*.f64 #s(literal 2 binary64) y-scale) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+.f64 (*.f64 #s(literal 2 binary64) y-scale) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))))))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 x-scale (PI.f64))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (*.f64 x-scale (PI.f64)))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (PI.f64)))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) (PI.f64))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))) angle)) |
#s(approx (* (* (PI) angle) (* (- b a) (+ b a))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* angle (* (PI) (- (pow b 2) (pow a 2)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* 1/180 angle) (*.f64 #s(literal 1/180 binary64) angle)) |
#s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (cos (* 2 (* (* 1/180 angle) (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/1574640000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (cos (* 2 (* (* 1/180 angle) (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64)) |
#s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) |
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (*.f64 #s(literal -1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) |
#s(approx (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) x-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) x-scale)))))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal 180 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))) (*.f64 #s(literal 180 binary64) (/.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) angle)) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) #s(literal 2 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) angle)) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal -180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) #s(literal 2 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) #s(literal 2 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) angle)) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) angle)) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))))))) angle)) |
#s(approx (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) |
#s(approx (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/15427944806400000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal -16200 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) angle)) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -16200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) angle)) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -16200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal -180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -5832000 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 3 binary64)) (pow.f64 (-.f64 b a) #s(literal 3 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))))) angle)) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) angle)) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))))) angle)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
#s(approx (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) |
#s(approx (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/25194240000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale y-scale))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) |
#s(approx (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/25194240000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 angle (PI.f64)) (*.f64 x-scale y-scale)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale)))))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale)))))))))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 x-scale y-scale))))))))))))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale y-scale)))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale)))))))))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 x-scale y-scale))))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))))) angle)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) angle)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) angle)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))))))) angle)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))))))))))) angle)) |
#s(approx (cos (* 1/180 (* angle (PI)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (cos (* 2 (* (* 1/180 angle) (PI)))) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
#s(approx (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))) |
#s(approx (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) |
#s(approx (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale)) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) |
#s(approx (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) |
#s(approx (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) |
#s(approx (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 x-scale y-scale)))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx x-scale x-scale) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) x-scale)) |
#s(approx (* x-scale x-scale) (pow.f64 x-scale #s(literal 2 binary64))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale))) (/.f64 (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) x-scale)) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) x-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 y-scale (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) x-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) x-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 y-scale (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) x-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) x-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) x-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) x-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) x-scale)) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* x-scale y-scale) (*.f64 x-scale y-scale)) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) x-scale)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) x-scale)) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) x-scale)) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) x-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) x-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) x-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) x-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))))) |
#s(approx y-scale y-scale) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) y-scale)) |
#s(approx (* y-scale y-scale) (pow.f64 y-scale #s(literal 2 binary64))) |
#s(approx (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) y-scale)) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) y-scale)) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) y-scale)) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) |
#s(approx (/ (- (pow a 2) (sqrt (pow a 4))) y-scale) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) y-scale)) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (/.f64 (+.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) y-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) y-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) y-scale)) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) y-scale)) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) y-scale)) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) y-scale)) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) y-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) y-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) y-scale)) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) |
#s(approx (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (/.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) |
#s(approx (+ (* (- (/ (+ (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))))) (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a))) (* x-scale x-scale))) (/ (* x-scale y-scale) (* (* (* (+ b a) (* (- b a) 2)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/ (neg (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (* (* (sin (* (* 1/180 angle) (PI))) (/ (cos (* (* 1/180 angle) (PI))) (* x-scale y-scale))) (* (+ b a) (* (- b a) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))))))))) |
15 calls:
| Time | Variable | Point |
|---|---|---|
| 154.0ms | a | inf |
| 103.0ms | angle | 0 |
| 52.0ms | a | 0 |
| 46.0ms | b | -inf |
| 45.0ms | b | inf |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 182 | 7492 |
| 0 | 291 | 6952 |
| 1 | 1595 | 6726 |
| 0 | 4050 | 6552 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 1/180 binary64) |
(PI.f64) |
(*.f64 angle (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(literal 4 binary64) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) |
#s(literal 2 binary64) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
#s(literal 90 binary64) |
(*.f64 a a) |
(*.f64 y-scale y-scale) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(*.f64 b b) |
(*.f64 x-scale x-scale) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) |
(fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) |
(+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) |
(*.f64 (PI.f64) angle) |
(-.f64 b a) |
(+.f64 b a) |
(*.f64 (-.f64 b a) (+.f64 b a)) |
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))) |
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) |
(*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(pow.f64 a #s(literal 2 binary64)) |
(pow.f64 a #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 a #s(literal 4 binary64))) |
(-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
(*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) |
(pow.f64 b #s(literal 2 binary64)) |
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
(*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
(*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
(/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)) |
(+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) |
(/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) |
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) |
(*.f64 x-scale y-scale) |
(*.f64 (-.f64 b a) #s(literal 2 binary64)) |
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) |
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) |
(/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) |
(neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) |
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) |
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) |
(atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) |
(/.f64 (atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) (PI.f64))) |
| Outputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 1/180 binary64) |
(PI.f64) |
(*.f64 (PI.f64) angle) |
(*.f64 angle (PI.f64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle)) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
#s(literal 4 binary64) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64)))) |
(pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 4 binary64))) |
(pow.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)) |
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))))) |
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) |
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))))) |
(fabs.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) |
#s(literal 2 binary64) |
(*.f64 (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) |
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))))) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (-.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))))) |
(-.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) |
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) |
(*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) |
(*.f64 y-scale (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) y-scale)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) y-scale)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) y-scale))))) |
(+.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) y-scale)) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) x-scale) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) x-scale)) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale x-scale)) |
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) x-scale)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale)) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale))) |
(/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(+.f64 (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(+.f64 (/.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64))))) (PI.f64)) |
#s(literal 90 binary64) |
(*.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 binary64))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) a) |
(*.f64 (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 a) (fabs.f64 a)) |
(*.f64 (neg.f64 a) (neg.f64 a)) |
(*.f64 a a) |
(pow.f64 (fabs.f64 a) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 a) #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
(fabs.f64 (*.f64 a a)) |
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (fabs.f64 y-scale)) (fabs.f64 (fabs.f64 y-scale))) |
(*.f64 (neg.f64 (fabs.f64 y-scale)) (neg.f64 (fabs.f64 y-scale))) |
(*.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (neg.f64 y-scale))) |
(*.f64 (pow.f64 y-scale #s(literal 1 binary64)) (pow.f64 y-scale #s(literal 1 binary64))) |
(*.f64 (pow.f64 y-scale #s(literal 1 binary64)) y-scale) |
(*.f64 (pow.f64 y-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 y-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 y-scale) (fabs.f64 y-scale)) |
(*.f64 (neg.f64 y-scale) (neg.f64 y-scale)) |
(*.f64 y-scale y-scale) |
(pow.f64 (fabs.f64 y-scale) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 y-scale) #s(literal 2 binary64)) |
(pow.f64 y-scale #s(literal 2 binary64)) |
(fabs.f64 (*.f64 y-scale y-scale)) |
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))) |
(*.f64 (/.f64 (fabs.f64 a) (fabs.f64 y-scale)) (/.f64 (fabs.f64 a) (fabs.f64 y-scale))) |
(*.f64 (/.f64 (fabs.f64 a) (neg.f64 y-scale)) (/.f64 (fabs.f64 a) (neg.f64 y-scale))) |
(*.f64 (/.f64 (fabs.f64 a) y-scale) (/.f64 (fabs.f64 a) y-scale)) |
(*.f64 (/.f64 (neg.f64 a) (fabs.f64 y-scale)) (/.f64 (neg.f64 a) (fabs.f64 y-scale))) |
(*.f64 (/.f64 (neg.f64 a) y-scale) (/.f64 (neg.f64 a) y-scale)) |
(*.f64 (/.f64 a (fabs.f64 y-scale)) (/.f64 a (fabs.f64 y-scale))) |
(*.f64 (/.f64 a (neg.f64 y-scale)) (/.f64 a (neg.f64 y-scale))) |
(*.f64 (fabs.f64 (/.f64 a y-scale)) (fabs.f64 (/.f64 a y-scale))) |
(*.f64 (neg.f64 (/.f64 a y-scale)) (neg.f64 (/.f64 a y-scale))) |
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale)) |
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 a (/.f64 a (*.f64 y-scale y-scale))) |
(pow.f64 (/.f64 a y-scale) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (/.f64 (*.f64 a a) y-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 a a))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (/.f64 (*.f64 a a) y-scale) y-scale) |
(/.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))) |
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) |
(*.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) b) |
(*.f64 (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 b) (fabs.f64 b)) |
(*.f64 (neg.f64 b) (neg.f64 b)) |
(*.f64 b b) |
(pow.f64 (fabs.f64 b) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 b) #s(literal 2 binary64)) |
(pow.f64 b #s(literal 2 binary64)) |
(fabs.f64 (*.f64 b b)) |
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (fabs.f64 x-scale)) (fabs.f64 (fabs.f64 x-scale))) |
(*.f64 (neg.f64 (fabs.f64 x-scale)) (neg.f64 (fabs.f64 x-scale))) |
(*.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (neg.f64 x-scale))) |
(*.f64 (pow.f64 x-scale #s(literal 1 binary64)) (pow.f64 x-scale #s(literal 1 binary64))) |
(*.f64 (pow.f64 x-scale #s(literal 1 binary64)) x-scale) |
(*.f64 (pow.f64 x-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 x-scale (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 x-scale) (fabs.f64 x-scale)) |
(*.f64 (neg.f64 x-scale) (neg.f64 x-scale)) |
(*.f64 x-scale x-scale) |
(pow.f64 (fabs.f64 x-scale) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 x-scale) #s(literal 2 binary64)) |
(pow.f64 x-scale #s(literal 2 binary64)) |
(fabs.f64 (*.f64 x-scale x-scale)) |
(exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64))) |
(*.f64 (/.f64 (fabs.f64 b) (fabs.f64 x-scale)) (/.f64 (fabs.f64 b) (fabs.f64 x-scale))) |
(*.f64 (/.f64 (fabs.f64 b) (neg.f64 x-scale)) (/.f64 (fabs.f64 b) (neg.f64 x-scale))) |
(*.f64 (/.f64 (fabs.f64 b) x-scale) (/.f64 (fabs.f64 b) x-scale)) |
(*.f64 (/.f64 (neg.f64 b) (fabs.f64 x-scale)) (/.f64 (neg.f64 b) (fabs.f64 x-scale))) |
(*.f64 (/.f64 (neg.f64 b) x-scale) (/.f64 (neg.f64 b) x-scale)) |
(*.f64 (/.f64 b (fabs.f64 x-scale)) (/.f64 b (fabs.f64 x-scale))) |
(*.f64 (/.f64 b (neg.f64 x-scale)) (/.f64 b (neg.f64 x-scale))) |
(*.f64 (fabs.f64 (/.f64 b x-scale)) (fabs.f64 (/.f64 b x-scale))) |
(*.f64 (neg.f64 (/.f64 b x-scale)) (neg.f64 (/.f64 b x-scale))) |
(*.f64 (/.f64 b x-scale) (/.f64 b x-scale)) |
(*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 b (/.f64 b (*.f64 x-scale x-scale))) |
(pow.f64 (/.f64 b x-scale) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (/.f64 (*.f64 b b) x-scale)) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 b b))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (/.f64 (*.f64 b b) x-scale) x-scale) |
(/.f64 (neg.f64 (*.f64 b b)) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b))) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (neg.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (neg.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (neg.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) y-scale) (*.f64 x-scale (/.f64 (*.f64 a a) y-scale))) (*.f64 x-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 x-scale (neg.f64 (*.f64 a a)))) (*.f64 x-scale (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) y-scale) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) y-scale)) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 a a)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 a a))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 a a) y-scale))) (*.f64 (*.f64 x-scale x-scale) y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (neg.f64 (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 a a))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 a a)) (*.f64 y-scale y-scale)) |
(/.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (+.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(neg.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) |
(-.f64 (/.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) |
(+.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (neg.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) |
(*.f64 (sqrt.f64 (-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (sqrt.f64 (-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))))) |
(*.f64 (pow.f64 (-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64))) |
(pow.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64)) |
(/.f64 (fabs.f64 (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 a a))) (*.f64 y-scale y-scale)) |
(/.f64 (fabs.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 a a)))) (fabs.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(sqrt.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) |
(fabs.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))))) |
(fabs.f64 (neg.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))) |
(fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) |
(fabs.f64 (neg.f64 (-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))))) |
(fabs.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) |
(fabs.f64 (-.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))) |
(/.f64 (-.f64 (pow.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) |
(/.f64 (+.f64 (pow.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) #s(literal 3 binary64)) (pow.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))) |
(-.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) |
(+.f64 (/.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) |
(+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) |
(+.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) |
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (+.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (neg.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (neg.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (neg.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))) (+.f64 (*.f64 (*.f64 b (/.f64 b (*.f64 x-scale x-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))))) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (*.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (+.f64 (*.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))))) |
(neg.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) |
(-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) |
(-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) |
(+.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (neg.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) |
(*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) |
(*.f64 y-scale (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) |
(*.f64 (PI.f64) angle) |
(*.f64 angle (PI.f64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 a b)) b) |
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b (neg.f64 a))))) |
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 a a) (*.f64 b a)))) |
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) |
(neg.f64 (-.f64 a b)) |
(-.f64 b a) |
(+.f64 b (neg.f64 a)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b) |
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 b b) (*.f64 a b)))) |
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 a a) (*.f64 b (neg.f64 a))))) |
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b a)))) |
(/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 b a)) |
(-.f64 b (neg.f64 a)) |
(+.f64 b a) |
(+.f64 a b) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(*.f64 (-.f64 b a) (+.f64 b a)) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 b a) b) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 b a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) b)) (-.f64 (*.f64 (*.f64 (-.f64 b a) a) (*.f64 (-.f64 b a) a)) (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b (-.f64 b a)) #s(literal 3 binary64)) (pow.f64 (*.f64 a (-.f64 b a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b (-.f64 b a)) (*.f64 b (-.f64 b a))) (-.f64 (*.f64 (*.f64 a (-.f64 b a)) (*.f64 a (-.f64 b a))) (*.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a)))))) |
(+.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a)) |
(+.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a))) |
(*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a)) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)) |
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))) |
(*.f64 (PI.f64) (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 y-scale (+.f64 b a))) |
(*.f64 (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (PI.f64)) (/.f64 y-scale (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (+.f64 b a))) |
(*.f64 (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (PI.f64) angle))) |
(*.f64 (/.f64 y-scale (*.f64 (PI.f64) angle)) (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (/.f64 y-scale (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (PI.f64) angle))) |
(*.f64 (/.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (PI.f64) angle)) (/.f64 y-scale (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) |
(*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (*.f64 (PI.f64) angle))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a)))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))) |
(/.f64 (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (*.f64 (PI.f64) angle)) (*.f64 (+.f64 b a) (-.f64 b a))) |
(/.f64 (neg.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale))) |
(/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))) |
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a))) |
(*.f64 (/.f64 x-scale (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (*.f64 (PI.f64) angle))) |
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (*.f64 angle (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) x-scale) |
(*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))) |
(/.f64 (neg.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale))) (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) |
(/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))) |
(*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))) |
(*.f64 (*.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) x-scale) #s(literal 90 binary64)) |
(*.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle))))))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(*.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 binary64))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) a) |
(*.f64 (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 a) (fabs.f64 a)) |
(*.f64 (neg.f64 a) (neg.f64 a)) |
(*.f64 a a) |
(pow.f64 (fabs.f64 a) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 a) #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
(fabs.f64 (*.f64 a a)) |
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) |
(*.f64 (pow.f64 a (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 4 binary64) #s(literal 2 binary64)))) |
(pow.f64 a #s(literal 4 binary64)) |
(exp.f64 (*.f64 (log.f64 a) #s(literal 4 binary64))) |
(pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1/2 binary64)) |
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(sqrt.f64 (pow.f64 a #s(literal 4 binary64))) |
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(fabs.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 a a))) (*.f64 a a)) |
(/.f64 (+.f64 (pow.f64 (*.f64 a a) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (-.f64 (*.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 (*.f64 a a) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (+.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 a a) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (+.f64 (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) |
(neg.f64 (-.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 a a))) |
(-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(+.f64 (*.f64 a a) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 a a) y-scale)) (*.f64 (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale))) (+.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 a a) y-scale)) (+.f64 (*.f64 (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale)) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale))))) |
(/.f64 (-.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 y-scale (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (neg.f64 y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) |
(/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale) |
(-.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale)) |
(+.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
(*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) |
(*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) |
(*.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) b) |
(*.f64 (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 b) (fabs.f64 b)) |
(*.f64 (neg.f64 b) (neg.f64 b)) |
(*.f64 b b) |
(pow.f64 (fabs.f64 b) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 b) #s(literal 2 binary64)) |
(pow.f64 b #s(literal 2 binary64)) |
(fabs.f64 (*.f64 b b)) |
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))) (*.f64 b b)) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 a a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 a a))))) |
(neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a))) |
(*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) |
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (PI.f64)) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) a a) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (PI.f64) b b (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) b b (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) b b (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (PI.f64) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (PI.f64) b b a a) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(*.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) angle) |
(*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))) |
(*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) a a) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (*.f64 (PI.f64) angle) b b a a) |
(*.f64 (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (PI.f64) angle)) (/.f64 x-scale (-.f64 (*.f64 b b) (*.f64 a a)))) |
(*.f64 (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) angle) (/.f64 x-scale (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) angle)) |
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(*.f64 (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 x-scale angle)) |
(*.f64 (/.f64 x-scale angle) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(*.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)) (neg.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))) |
(/.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(/.f64 (neg.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale)) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale))) |
(/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)) |
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) angle)) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(*.f64 (/.f64 #s(literal 90 binary64) angle) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)) |
(*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))))) |
(/.f64 (neg.f64 (*.f64 #s(literal 90 binary64) (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale))) (neg.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) |
(/.f64 (*.f64 #s(literal 90 binary64) (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
#s(literal 1/2 binary64) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 angle #s(literal 1/180 binary64)) |
(/.f64 (neg.f64 (neg.f64 angle)) #s(literal 180 binary64)) |
(/.f64 (neg.f64 angle) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) angle)) |
(/.f64 angle #s(literal 180 binary64)) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) angle)) (PI.f64)) |
(*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (+.f64 (*.f64 (PI.f64) angle) (*.f64 (PI.f64) angle)) #s(literal 180 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) (*.f64 #s(literal 180 binary64) (*.f64 (PI.f64) angle))) #s(literal 32400 binary64)) |
(+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) |
(/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) |
(cos.f64 (fabs.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) |
(cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (*.f64 b b)) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) |
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))))) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a))) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))) |
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 1/2 binary64))) |
(pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) |
(fabs.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))) |
(fabs.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))) |
(fabs.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(fabs.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(fabs.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(fabs.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(fabs.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) #s(literal 2 binary64)) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b))) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))))) |
(/.f64 (-.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (-.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(/.f64 (+.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))))) |
(-.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) |
(+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(+.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (/.f64 #s(literal 1 binary64) x-scale)) |
(/.f64 (+.f64 (pow.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))))) |
(/.f64 (+.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 x-scale)) (*.f64 x-scale (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 x-scale (neg.f64 x-scale))) |
(/.f64 (+.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 x-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) |
(-.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) |
(+.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) x-scale)) |
(+.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) x-scale)) |
(+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) |
(+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (-.f64 b a) (*.f64 (+.f64 b a) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(/.f64 (neg.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))))) |
(/.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 (neg.f64 y-scale) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale)) |
(/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(/.f64 (*.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 x-scale))) |
(/.f64 (*.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(/.f64 (*.f64 (neg.f64 y-scale) (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) (neg.f64 x-scale))) |
(/.f64 (*.f64 (neg.f64 y-scale) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) x-scale)) |
(/.f64 (*.f64 y-scale (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 x-scale))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (neg.f64 x-scale) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 y-scale)) (*.f64 (neg.f64 x-scale) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) y-scale) (*.f64 (neg.f64 x-scale) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 y-scale)) (*.f64 x-scale (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) y-scale)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))))) (neg.f64 x-scale)) |
(/.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) x-scale) |
(/.f64 (neg.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale)) (neg.f64 (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(+.f64 (/.f64 (*.f64 y-scale (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))))) |
(+.f64 (/.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))))))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))))) |
(*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64))))) (PI.f64)) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) (neg.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) |
(*.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b)) #s(literal 2 binary64))) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) a) a) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (*.f64 a a)) |
(*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (+.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (+.f64 (*.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (-.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (-.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))))) |
(-.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a))) |
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) |
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) |
(/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) |
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) y-scale) |
(-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) y-scale) y-scale)) |
(+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) |
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) |
(*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) x-scale)) |
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 1 binary64)) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) |
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) x-scale) |
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b)) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 a a)) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale)) (/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) x-scale) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) x-scale) x-scale)) |
(+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale x-scale))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale)) (neg.f64 x-scale)) (*.f64 (neg.f64 y-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (*.f64 (neg.f64 y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale)) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (neg.f64 y-scale) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (neg.f64 y-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale)) x-scale) (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 (neg.f64 y-scale) x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (neg.f64 x-scale)) (*.f64 y-scale (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (*.f64 y-scale (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 y-scale (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 y-scale (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (neg.f64 x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))) |
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) x-scale) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 (neg.f64 (*.f64 y-scale y-scale)) x-scale)) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 x-scale)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 x-scale))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) x-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 (*.f64 y-scale y-scale) x-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (neg.f64 x-scale)) |
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) x-scale) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) x-scale) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) x-scale) (*.f64 y-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (*.f64 x-scale y-scale)) |
(neg.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) x-scale) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) x-scale) (*.f64 x-scale y-scale)) (/.f64 (*.f64 y-scale (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 x-scale y-scale))) |
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) |
(*.f64 x-scale y-scale) |
(*.f64 y-scale x-scale) |
(*.f64 (-.f64 b a) #s(literal 2 binary64)) |
(*.f64 #s(literal 2 binary64) (-.f64 b a)) |
(*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) |
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) |
(*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) |
(*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) |
(*.f64 (+.f64 b a) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) (/.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (*.f64 x-scale y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 x-scale (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(/.f64 (neg.f64 (*.f64 x-scale y-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 x-scale y-scale) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) |
(*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (neg.f64 (*.f64 x-scale y-scale)) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 x-scale x-scale))) |
(/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (*.f64 x-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 (*.f64 x-scale y-scale))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(134-z0z1z2z3z4 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(134-z0z1z2z3z4 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) |
(134-z0z1z2z3z4 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) |
(pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) #s(literal 2 binary64))) |
(fabs.f64 (-.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 a a)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) |
(fabs.f64 (-.f64 (neg.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) |
(fabs.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))))) |
(fabs.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) |
(fabs.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) |
(fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) |
(*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) |
(/.f64 (neg.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) y-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale)))) |
(/.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) y-scale) y-scale) |
(/.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))))) (neg.f64 (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))))) |
(/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)) |
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale))) |
(neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) |
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (neg.f64 y-scale)) |
(/.f64 (neg.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale)))) |
(/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) y-scale) |
(/.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale)) |
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) y-scale)) |
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) |
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 (*.f64 x-scale y-scale))) |
(/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (+.f64 b a)) (*.f64 (-.f64 b a) #s(literal 2 binary64))) |
(*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) |
(*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) |
(*.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) |
(/.f64 (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (neg.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) |
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))))) (neg.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))))) |
(/.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) |
(/.f64 (neg.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale))))) (neg.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))))) |
(/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) |
(neg.f64 (/.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))) (*.f64 (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))))) (+.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))))) (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (+.f64 (*.f64 (neg.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale)))) (*.f64 (neg.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (*.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale)) (neg.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))))) (neg.f64 (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))))) (-.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))))))) |
(-.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (neg.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))))) |
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) |
(+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))) |
(+.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))))) |
(atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) |
(*.f64 (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))))) |
(/.f64 (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale)))))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (+.f64 (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale x-scale))))))) (PI.f64)) |
| 2.3s | 20 975× | 0 | valid |
| 49.0ms | 785× | 0 | invalid |
Compiled 769 419 to 25 912 computations (96.6% saved)
ival-mult!: 1.5s (93.9% of total)ival-sub!: 65.0ms (4.2% of total)adjust: 30.0ms (1.9% of total)72 alts after pruning (72 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 2 112 | 63 | 2 175 |
| Fresh | 47 | 9 | 56 |
| Picked | 5 | 0 | 5 |
| Done | 0 | 0 | 0 |
| Total | 2 164 | 72 | 2 236 |
| Status | Accuracy | Program |
|---|---|---|
| 30.1% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64))))) (PI.f64)) | |
| 8.6% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) | |
| 18.7% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) | |
| 30.0% | (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) | |
| 29.6% | (*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) | |
| 25.3% | (*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64))) | |
| 13.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) | |
| 10.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) | |
| 18.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) | |
| 17.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) | |
| 13.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) | |
| 19.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) | |
| ▶ | 8.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
| 6.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 8.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 10.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) | |
| 12.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) | |
| 11.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) | |
| 11.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 7.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 27.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 5.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) | |
| 38.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) | |
| 23.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 22.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 23.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 25.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 18.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| ▶ | 31.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| 23.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 30.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 20.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 27.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 14.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 43.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| ▶ | 46.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| 43.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 35.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))))))) (PI.f64))) | |
| 32.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))))))))) (PI.f64))) | |
| 39.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| ▶ | 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| 43.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 41.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 41.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 44.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 42.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) | |
| 42.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) | |
| 35.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) | |
| 37.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) | |
| 39.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 6.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (PI.f64))) | |
| 6.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) | |
| 40.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) | |
| 27.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) | |
| 35.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) | |
| ▶ | 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
| 40.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 35.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
Compiled 40 118 to 11 958 computations (70.2% saved)
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 4836 | 127623 |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 1/180 binary64) |
(*.f64 #s(literal 1/180 binary64) angle) |
(PI.f64) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
#s(literal 2 binary64) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
#s(literal 4 binary64) |
(pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) |
(pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
(*.f64 angle (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
#s(literal -90 binary64) |
(*.f64 y-scale (PI.f64)) |
(*.f64 angle (*.f64 y-scale (PI.f64))) |
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) |
(*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
#s(literal 90 binary64) |
(*.f64 (PI.f64) angle) |
(/.f64 x-scale (*.f64 (PI.f64) angle)) |
(*.f64 a a) |
(pow.f64 a #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 a #s(literal 4 binary64))) |
(-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
(*.f64 b b) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))) |
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) |
#s(literal 1/2 binary64) |
(*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) |
(cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) |
(*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) |
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(+.f64 b a) |
(-.f64 b a) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) |
(/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Outputs |
|---|
#s(approx a a) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64))) |
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64)))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 a (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 a (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (*.f64 a (+.f64 (*.f64 #s(literal -90 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))))))) |
#s(approx (* a a) (pow.f64 a #s(literal 2 binary64))) |
#s(approx (pow a 4) (pow.f64 a #s(literal 4 binary64))) |
#s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (- (* b b) (* a a)) (pow.f64 b #s(literal 2 binary64))) |
#s(approx (- (* b b) (* a a)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)))) |
#s(approx (+ b a) b) |
#s(approx (+ b a) (+.f64 a b)) |
#s(approx (- b a) (+.f64 b (*.f64 #s(literal -1 binary64) a))) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) b))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 a (+.f64 b (+.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal -1 binary64) b)))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (+.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (+.f64 (*.f64 a (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 a (-.f64 (*.f64 a (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 2 binary64)))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))))) |
#s(approx (- (* b b) (* a a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (- (* b b) (* a a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64)))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 6 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64)))))))) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale))))) |
#s(approx (+ b a) (*.f64 a (+.f64 #s(literal 1 binary64) (/.f64 b a)))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) |
#s(approx (- b a) (*.f64 a (-.f64 (/.f64 b a) #s(literal 1 binary64)))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) (/.f64 b a)) #s(literal 1 binary64)))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) (+.f64 (/.f64 b a) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) #s(literal 1 binary64)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 3 binary64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a))) a)))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 x-scale (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (+.f64 b (*.f64 #s(literal -1 binary64) b)))) (*.f64 angle (*.f64 y-scale (PI.f64))))) a))) a))) a)))) |
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 a (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 b a)) #s(literal 1 binary64))))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 b a)))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) a)) #s(literal 1 binary64)))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 b (+.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) a)))) a)) #s(literal 1 binary64)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b))) a))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) a)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 b (*.f64 #s(literal -1 binary64) b)))) a))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) a)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 b (*.f64 #s(literal -1 binary64) b)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (*.f64 b (+.f64 (*.f64 #s(literal -90 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 y-scale (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))))))) |
#s(approx (- (* b b) (* a a)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 a #s(literal 4 binary64))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (+.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)))) |
#s(approx (- b a) (-.f64 b a)) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 a (*.f64 #s(literal -1 binary64) a))))) |
#s(approx (* (+ b a) (- b a)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 b (+.f64 a (+.f64 b (*.f64 #s(literal -1 binary64) a)))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (+.f64 (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64)))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 x-scale (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64))) (+.f64 (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (- (* b b) (* a a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (PI.f64) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 6 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))))))))))) (*.f64 angle (PI.f64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))))))) |
#s(approx (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) x-scale))))) |
#s(approx (+ b a) (*.f64 b (+.f64 #s(literal 1 binary64) (/.f64 a b)))) |
#s(approx (- b a) (*.f64 b (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 a b))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (/.f64 a b))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))) (/.f64 a b)))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))) b)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a))) b))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 3 binary64)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal 90 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))) b))) b)))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (*.f64 #s(literal -90 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (*.f64 angle (*.f64 x-scale (PI.f64)))))) b))) b))) b)))) |
#s(approx (+ b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 a b)) #s(literal 1 binary64))))) |
#s(approx (- b a) (*.f64 #s(literal -1 binary64) (*.f64 b (-.f64 (/.f64 a b) #s(literal 1 binary64))))) |
#s(approx (* (+ b a) (- b a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 a (*.f64 #s(literal -1 binary64) a))) (/.f64 (pow.f64 a #s(literal 2 binary64)) b)) b))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 a (*.f64 #s(literal -1 binary64) a)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) b)) b))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b))) b)) (/.f64 (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) b)) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
#s(approx angle angle) |
#s(approx (* 1/180 angle) (*.f64 #s(literal 1/180 binary64) angle)) |
#s(approx (* (* 1/180 angle) (PI)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (neg (* (* 1/180 angle) (PI))) (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) |
#s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) |
#s(approx (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/34992000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4) (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4) (+.f64 (*.f64 angle (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4) (+.f64 (*.f64 angle (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) |
#s(approx (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) |
#s(approx (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) |
#s(approx (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.f64 (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (+.f64 (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (+.f64 (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) |
#s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (+.f64 (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (+.f64 (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) |
#s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (+.f64 (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) |
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) |
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (+.f64 (*.f64 angle (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (+.f64 (*.f64 angle (+.f64 (*.f64 angle (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) |
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (+.f64 (*.f64 angle (+.f64 (*.f64 angle (+.f64 (*.f64 angle (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) |
#s(approx (* angle (PI)) (*.f64 angle (PI.f64))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) |
#s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) |
#s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) |
#s(approx (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) |
#s(approx (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) |
#s(approx (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (pow.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (*.f64 #s(literal 1/97200 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (+.f64 (*.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))) angle)) |
#s(approx (* angle (* y-scale (PI))) (*.f64 angle (*.f64 y-scale (PI.f64)))) |
#s(approx (/ x-scale (* angle (* y-scale (PI)))) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (/ x-scale (* (PI) angle)) (/.f64 x-scale (*.f64 angle (PI.f64)))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) |
#s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
#s(approx (cos (* (* (* 1/180 angle) (PI)) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/1574640000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (cos (* (* (* 1/180 angle) (PI)) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64)) |
#s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
#s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) |
#s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) #s(literal 1/2 binary64))) |
#s(approx (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))))) #s(literal 2 binary64)) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))))) (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))))) (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))))) (+.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (*.f64 #s(literal 2 binary64) y-scale)) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (+.f64 (*.f64 #s(literal 2 binary64) y-scale) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (+.f64 (*.f64 #s(literal 2 binary64) y-scale) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (+.f64 (*.f64 #s(literal 2 binary64) y-scale) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))))))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 x-scale (PI.f64))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale (PI.f64)))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale (PI.f64)))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale (PI.f64)))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) (PI.f64))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal 1/2267481600000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)) |
#s(approx (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) (+.f64 b (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) |
#s(approx (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64)) |
#s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) |
#s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) |
#s(approx (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) |
#s(approx (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (*.f64 #s(literal -1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal -1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) (*.f64 #s(literal 1/32400 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) |
#s(approx (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) |
#s(approx (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) |
#s(approx (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) |
#s(approx (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a)) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 b #s(literal 2 binary64))))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) x-scale)) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (+.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) x-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) x-scale)))))))))) (+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a)))))))) angle)) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/194400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/699840000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a)))))))) angle)) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/194400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal -1/194400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/699840000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a))))))))) (+.f64 (*.f64 #s(literal -1/952342272000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 1/125971200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) (+.f64 (*.f64 #s(literal -1/194400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/699840000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (+.f64 a b) (-.f64 b a)))))))) angle)) |
#s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) y-scale) |
#s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) (+.f64 y-scale (*.f64 #s(literal 1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64))))))) |
#s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) (+.f64 y-scale (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4199040000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 #s(literal -1/64800 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) (+.f64 y-scale (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/1632586752000000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4199040000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))) (+.f64 (*.f64 #s(literal -1/4199040000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 #s(literal -1/64800 binary64) (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) angle)) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) angle)) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) angle)) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64)))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (+.f64 (*.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 a b) #s(literal 2 binary64)) (pow.f64 (-.f64 b a) #s(literal 2 binary64))))))))))))))) angle)) |
#s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (*.f64 angle (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)) (*.f64 #s(literal 1/180 binary64) (PI.f64))))) |
#s(approx (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) |
#s(approx (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (sqrt.f64 (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64)))) |
#s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))) |
#s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))) |
#s(approx (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))) |
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2))) (* x-scale (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (cos (* 1/180 (* angle (PI)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 4) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) |
#s(approx (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) |
#s(approx (cos (* (* (* 1/180 angle) (PI)) 2)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
#s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (*.f64 y-scale (-.f64 (+.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (*.f64 y-scale (-.f64 (+.f64 #s(literal 1/2 binary64) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
#s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) x-scale)) |
#s(approx (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))) |
#s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) |
#s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
#s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle)) (*.f64 #s(literal -1/180 binary64) (PI.f64)))))) |
#s(approx x-scale x-scale) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) x-scale)) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) x-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 y-scale (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 y-scale (*.f64 (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) x-scale)) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) x-scale)) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) x-scale)) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) x-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) y-scale)) |
#s(approx (* y-scale (PI)) (*.f64 y-scale (PI.f64))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) |
#s(approx (/ (- (* a a) (sqrt (pow a 4))) y-scale) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) y-scale)) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) y-scale)) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) y-scale)) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (/.f64 (+.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) y-scale)) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (/.f64 (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) y-scale)) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) y-scale)) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (/.f64 (+.f64 (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))) y-scale)) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (fabs.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (+.f64 (/.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) |
#s(approx (* 90 (* (/ x-scale (* (PI) angle)) (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal 45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 2 binary64))))))) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) |
15 calls:
| Time | Variable | Point |
|---|---|---|
| 46.0ms | angle | 0 |
| 44.0ms | x-scale | inf |
| 32.0ms | a | 0 |
| 31.0ms | a | inf |
| 28.0ms | angle | -inf |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 186 | 7151 |
| 0 | 273 | 6844 |
| 1 | 1487 | 6452 |
| 0 | 4160 | 6239 |
| 1× | iter-limit |
| 1× | node-limit |
| 1× | iter-limit |
| Inputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 1/180 binary64) |
(*.f64 #s(literal 1/180 binary64) angle) |
(PI.f64) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
#s(literal 2 binary64) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
#s(literal 4 binary64) |
(pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) |
(pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) |
(*.f64 angle (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
#s(literal -90 binary64) |
(*.f64 y-scale (PI.f64)) |
(*.f64 angle (*.f64 y-scale (PI.f64))) |
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) |
(*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
#s(literal 90 binary64) |
(*.f64 (PI.f64) angle) |
(/.f64 x-scale (*.f64 (PI.f64) angle)) |
(*.f64 a a) |
(pow.f64 a #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 a #s(literal 4 binary64))) |
(-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
(*.f64 b b) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))) |
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))) |
(*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) |
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) |
#s(literal 1/2 binary64) |
(*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) |
(cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) |
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) |
(*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) |
(/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) |
(*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) |
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(+.f64 b a) |
(-.f64 b a) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) |
(/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) |
(/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Outputs |
|---|
#s(literal 180 binary64) |
a |
angle |
b |
y-scale |
x-scale |
#s(literal -1/2 binary64) |
#s(literal 1/180 binary64) |
(*.f64 #s(literal 1/180 binary64) angle) |
(*.f64 angle #s(literal 1/180 binary64)) |
(/.f64 (neg.f64 (neg.f64 angle)) #s(literal 180 binary64)) |
(/.f64 (neg.f64 angle) #s(literal -180 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) angle)) |
(/.f64 angle #s(literal 180 binary64)) |
(PI.f64) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (neg.f64 (*.f64 #s(literal 1/180 binary64) angle)) (PI.f64)) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) |
(neg.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (neg.f64 (*.f64 #s(literal 1/180 binary64) angle)))) |
#s(literal 2 binary64) |
(*.f64 (PI.f64) #s(literal 1/2 binary64)) |
(/.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) |
(/.f64 (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) #s(literal 2 binary64)) (PI.f64))) #s(literal -2 binary64)) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (-.f64 (*.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))) (-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
#s(literal 4 binary64) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64)))) |
(pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 4 binary64))) |
(*.f64 (pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) #s(literal -1/2 binary64))) |
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) |
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(fabs.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(134-z0z1z2z3z4 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) |
(-.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) |
(-.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) |
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) |
(*.f64 y-scale (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (-.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale))))) |
(+.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale)) |
(*.f64 (PI.f64) angle) |
(*.f64 angle (PI.f64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle)) |
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)) |
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) |
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)) |
(/.f64 (neg.f64 (*.f64 (PI.f64) angle)) #s(literal -180 binary64)) |
(/.f64 (*.f64 (PI.f64) angle) #s(literal 180 binary64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))) |
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64))) |
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) x-scale) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) x-scale) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) x-scale)) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale x-scale)) |
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) x-scale)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(/.f64 (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) x-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale)) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale))) |
(/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(+.f64 (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(+.f64 (/.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64))))) (PI.f64)) |
#s(literal -90 binary64) |
(*.f64 (PI.f64) y-scale) |
(*.f64 y-scale (PI.f64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)) |
(*.f64 (*.f64 angle y-scale) (PI.f64)) |
(*.f64 (*.f64 (PI.f64) y-scale) angle) |
(*.f64 angle (*.f64 (PI.f64) y-scale)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale))) |
(*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))) |
(/.f64 (neg.f64 (/.f64 x-scale angle)) (neg.f64 (*.f64 (PI.f64) y-scale))) |
(/.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle)))) |
(/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)) |
(/.f64 (neg.f64 x-scale) (neg.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)) |
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) |
(*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64))) |
(*.f64 (/.f64 #s(literal -90 binary64) (*.f64 (PI.f64) y-scale)) (/.f64 x-scale angle)) |
(*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale))) |
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)) |
(*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) |
(/.f64 (neg.f64 (*.f64 #s(literal -90 binary64) x-scale)) (neg.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle))) |
(/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle)) |
#s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
#s(literal 90 binary64) |
(*.f64 (PI.f64) angle) |
(*.f64 angle (PI.f64)) |
(log.f64 (pow.f64 (exp.f64 (PI.f64)) angle)) |
(*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) angle))) |
(/.f64 (neg.f64 (/.f64 x-scale (PI.f64))) (neg.f64 angle)) |
(/.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (neg.f64 (*.f64 (PI.f64) angle)))) |
(/.f64 (/.f64 x-scale (PI.f64)) angle) |
(/.f64 (neg.f64 x-scale) (neg.f64 (*.f64 (PI.f64) angle))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) angle) x-scale)) |
(/.f64 x-scale (*.f64 (PI.f64) angle)) |
(*.f64 (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(*.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 binary64))) |
(*.f64 (pow.f64 a #s(literal 1 binary64)) a) |
(*.f64 (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 a) (fabs.f64 a)) |
(*.f64 (neg.f64 a) (neg.f64 a)) |
(*.f64 a a) |
(pow.f64 (fabs.f64 a) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 a) #s(literal 2 binary64)) |
(pow.f64 a #s(literal 2 binary64)) |
(fabs.f64 (*.f64 a a)) |
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) |
(*.f64 (pow.f64 a (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 a (/.f64 #s(literal 4 binary64) #s(literal 2 binary64)))) |
(pow.f64 a #s(literal 4 binary64)) |
(exp.f64 (*.f64 (log.f64 a) #s(literal 4 binary64))) |
(*.f64 (pow.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal -1/2 binary64))) |
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(sqrt.f64 (pow.f64 a #s(literal 4 binary64))) |
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(fabs.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 a a))) (*.f64 a a)) |
(/.f64 (-.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (-.f64 (*.f64 a a) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 a a) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (-.f64 (*.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 (*.f64 a a) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))))) |
(/.f64 (-.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (+.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 a a) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (+.f64 (*.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))))) |
(neg.f64 (-.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) (*.f64 a a))) |
(-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) |
(+.f64 (*.f64 a a) (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) |
(*.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) y-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) y-scale) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale) |
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 a a) y-scale)) (*.f64 (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale))) (+.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 a a) y-scale)) (+.f64 (*.f64 (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale)) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale))))) |
(/.f64 (-.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 y-scale (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) (neg.f64 (neg.f64 y-scale))) |
(/.f64 (neg.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (neg.f64 y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))))) |
(/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale) |
(-.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64))) y-scale)) |
(+.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (neg.f64 (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
#s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) |
(*.f64 (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b))) |
(*.f64 (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64))) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) b) |
(*.f64 (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 b (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (fabs.f64 b) (fabs.f64 b)) |
(*.f64 (neg.f64 b) (neg.f64 b)) |
(*.f64 b b) |
(pow.f64 (fabs.f64 b) #s(literal 2 binary64)) |
(pow.f64 (neg.f64 b) #s(literal 2 binary64)) |
(pow.f64 b #s(literal 2 binary64)) |
(fabs.f64 (*.f64 b b)) |
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))) (*.f64 b b)) |
(*.f64 (-.f64 b a) (+.f64 b a)) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) b)) (*.f64 (*.f64 (-.f64 b a) a) (*.f64 (-.f64 b a) a))) (-.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a))) |
(/.f64 (-.f64 (*.f64 (*.f64 b (-.f64 b a)) (*.f64 b (-.f64 b a))) (*.f64 (*.f64 a (-.f64 b a)) (*.f64 a (-.f64 b a)))) (-.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a)))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 (neg.f64 a) a))) (-.f64 (*.f64 b b) (*.f64 (neg.f64 a) a))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a)))) (-.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 b a) b) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 b a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) b)) (-.f64 (*.f64 (*.f64 (-.f64 b a) a) (*.f64 (-.f64 b a) a)) (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b (-.f64 b a)) #s(literal 3 binary64)) (pow.f64 (*.f64 a (-.f64 b a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b (-.f64 b a)) (*.f64 b (-.f64 b a))) (-.f64 (*.f64 (*.f64 a (-.f64 b a)) (*.f64 a (-.f64 b a))) (*.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (*.f64 (neg.f64 a) a)) (*.f64 (*.f64 b b) (*.f64 (neg.f64 a) a))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 a a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 a a))))) |
(neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(+.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a)) |
(+.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a))) |
(+.f64 (*.f64 b b) (*.f64 (neg.f64 a) a)) |
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a))) |
(*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (neg.f64 (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (neg.f64 (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) |
(/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a))) |
(*.f64 (/.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (-.f64 b a)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a))) |
(*.f64 (/.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (+.f64 b a)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 b a))) |
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a))) |
(*.f64 (/.f64 x-scale (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (PI.f64) angle))) |
(*.f64 (/.f64 x-scale angle) (/.f64 (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a))) (PI.f64))) |
(*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a))) angle)) |
(*.f64 (/.f64 x-scale (PI.f64)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 angle (*.f64 (-.f64 b a) (+.f64 b a))))) |
(*.f64 (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 x-scale (*.f64 (PI.f64) angle))) |
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (*.f64 (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (/.f64 x-scale (PI.f64))) (*.f64 (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))) angle)) |
(/.f64 (*.f64 (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (neg.f64 x-scale)) (*.f64 (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (*.f64 (PI.f64) angle)))) |
(/.f64 (*.f64 (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) x-scale) (*.f64 (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (PI.f64) angle))) |
(/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (/.f64 x-scale (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) angle)) |
(/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (neg.f64 x-scale)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (neg.f64 (*.f64 (PI.f64) angle)))) |
(/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) |
(/.f64 (*.f64 (/.f64 x-scale (PI.f64)) (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (*.f64 angle (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 (*.f64 (/.f64 x-scale (PI.f64)) #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (*.f64 (neg.f64 x-scale) (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 (*.f64 (neg.f64 x-scale) #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (*.f64 x-scale (neg.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (*.f64 (*.f64 (PI.f64) angle) (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))))) |
(/.f64 (neg.f64 (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (neg.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a))))) (neg.f64 (*.f64 (PI.f64) angle))) |
(/.f64 (neg.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)))) (neg.f64 (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a)))) |
(/.f64 (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (-.f64 b a) (+.f64 b a))) |
(/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle)) |
(/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) |
(*.f64 (*.f64 #s(literal 90 binary64) (/.f64 x-scale (*.f64 (PI.f64) angle))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)) |
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a)))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64))))) (PI.f64)) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))) (-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 4 binary64) #s(literal 2 binary64)))) |
(pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 4 binary64))) |
(*.f64 (pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)) #s(literal -1/2 binary64))) |
(sqrt.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) |
(fabs.f64 (neg.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(fabs.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) |
#s(literal 1/2 binary64) |
(*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) |
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (*.f64 (PI.f64) #s(literal 2 binary64))) |
(*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) |
(cos.f64 (fabs.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) |
(cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1 binary64))) |
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal -1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (cos.f64 (-.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(134-z0z1z2z3z4 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) |
(-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) |
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))) |
(/.f64 (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) |
(-.f64 (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) |
(-.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) |
(+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) |
(*.f64 y-scale (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) |
(/.f64 (-.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (-.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale))) |
(/.f64 (+.f64 (pow.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))))) (-.f64 (*.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale)) (*.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale))))) |
(+.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(+.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale)) |
(*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) |
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64))) |
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) x-scale) |
(*.f64 x-scale (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) x-scale) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) x-scale)) |
(*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale x-scale)) |
(*.f64 (/.f64 y-scale x-scale) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) x-scale)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
(/.f64 (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) x-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (neg.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale)) (neg.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale))) |
(/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(+.f64 (/.f64 (*.f64 y-scale (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(+.f64 (/.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
#s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #s(literal -1/2 binary64))))) (PI.f64)) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) |
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(*.f64 (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (fabs.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(*.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 b b)) |
(*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) |
(*.f64 b (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b)) |
(pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b)) #s(literal 2 binary64))) |
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(134-z0z1z2z3z4 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (fabs.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) |
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))) |
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)) |
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) |
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) |
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) |
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) |
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (fabs.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64))) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64)))) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 a a)) |
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) |
(*.f64 a (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) |
(pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) #s(literal 2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))))) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a)) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (neg.f64 (*.f64 b b)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) |
(-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) |
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) |
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))) |
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 1/2 binary64))) |
(pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(/.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) #s(literal -1/2 binary64))) |
(sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) |
(fabs.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(fabs.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a)) a) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) |
(fabs.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) |
(fabs.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(fabs.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(fabs.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(/.f64 (-.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64))) (-.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(/.f64 (-.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64))) (-.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (-.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) #s(literal 2 binary64)) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) #s(literal 2 binary64)) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b))))) |
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))))) |
(/.f64 (-.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))))) |
(/.f64 (+.f64 (pow.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64)) (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))))) |
(-.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) |
(+.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) |
(+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) |
(+.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) |
(*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (/.f64 #s(literal 1 binary64) x-scale)) |
(/.f64 (+.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 x-scale x-scale)) |
(/.f64 (-.f64 (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) (-.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) (*.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale))))) |
(/.f64 (+.f64 (*.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 x-scale (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 x-scale x-scale)) |
(/.f64 (neg.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) (neg.f64 (neg.f64 x-scale))) |
(/.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 x-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))))) |
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) |
(-.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) |
(+.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) x-scale)) |
(+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale)) |
(+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) |
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 a b)) b) |
(/.f64 (-.f64 (*.f64 a a) (*.f64 b b)) (-.f64 a b)) |
(/.f64 (+.f64 (pow.f64 a #s(literal 3 binary64)) (pow.f64 b #s(literal 3 binary64))) (+.f64 (*.f64 a a) (-.f64 (*.f64 b b) (*.f64 a b)))) |
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 a a) (*.f64 b (neg.f64 a))))) |
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b a)))) |
(/.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (-.f64 b a)) |
(-.f64 b (neg.f64 a)) |
(+.f64 b a) |
(+.f64 a b) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 a b)) b) |
(/.f64 (+.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 (neg.f64 a) #s(literal 3 binary64))) (+.f64 (*.f64 b b) (-.f64 (*.f64 a a) (*.f64 b (neg.f64 a))))) |
(/.f64 (-.f64 (pow.f64 b #s(literal 3 binary64)) (pow.f64 a #s(literal 3 binary64))) (+.f64 (*.f64 b b) (+.f64 (*.f64 a a) (*.f64 b a)))) |
(/.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (+.f64 b a)) |
(neg.f64 (-.f64 a b)) |
(-.f64 b a) |
(+.f64 b (neg.f64 a)) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))) (*.f64 b b)) |
(*.f64 (-.f64 b a) (+.f64 b a)) |
(*.f64 (+.f64 b a) (-.f64 b a)) |
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) b)) (*.f64 (*.f64 (-.f64 b a) a) (*.f64 (-.f64 b a) a))) (-.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a))) |
(/.f64 (-.f64 (*.f64 (*.f64 b (-.f64 b a)) (*.f64 b (-.f64 b a))) (*.f64 (*.f64 a (-.f64 b a)) (*.f64 a (-.f64 b a)))) (-.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a)))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 (neg.f64 a) a))) (-.f64 (*.f64 b b) (*.f64 (neg.f64 a) a))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a)))) (-.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 b a) b) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 b a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) b)) (-.f64 (*.f64 (*.f64 (-.f64 b a) a) (*.f64 (-.f64 b a) a)) (*.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b (-.f64 b a)) #s(literal 3 binary64)) (pow.f64 (*.f64 a (-.f64 b a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b (-.f64 b a)) (*.f64 b (-.f64 b a))) (-.f64 (*.f64 (*.f64 a (-.f64 b a)) (*.f64 a (-.f64 b a))) (*.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a)))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a) a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (*.f64 (neg.f64 a) a)) (*.f64 (*.f64 b b) (*.f64 (neg.f64 a) a))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a a)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 b b) (neg.f64 (*.f64 a a)))))) |
(/.f64 (-.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 a a))) (+.f64 (*.f64 b b) (*.f64 a a))) |
(/.f64 (-.f64 (pow.f64 (*.f64 b b) #s(literal 3 binary64)) (pow.f64 (*.f64 a a) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 b b) (*.f64 b b)) (+.f64 (*.f64 (*.f64 a a) (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 a a))))) |
(neg.f64 (-.f64 (*.f64 a a) (*.f64 b b))) |
(-.f64 (*.f64 b b) (*.f64 a a)) |
(+.f64 (*.f64 (-.f64 b a) b) (*.f64 (-.f64 b a) a)) |
(+.f64 (*.f64 b (-.f64 b a)) (*.f64 a (-.f64 b a))) |
(+.f64 (*.f64 b b) (*.f64 (neg.f64 a) a)) |
(+.f64 (*.f64 b b) (neg.f64 (*.f64 a a))) |
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)) |
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (fabs.f64 b)) (neg.f64 (fabs.f64 b)) a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (neg.f64 b)) (neg.f64 (neg.f64 b)) a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 b) (fabs.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 b) (fabs.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 b) (fabs.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 b) (fabs.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 b) (fabs.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (fabs.f64 b) (fabs.f64 b) a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 b) (neg.f64 b) (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 b) (neg.f64 b) (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 b) (neg.f64 b) (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 b) (neg.f64 b) (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 b) (neg.f64 b) (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 b) (neg.f64 b) a a) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b b (fabs.f64 (fabs.f64 a)) (fabs.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b b (neg.f64 (fabs.f64 a)) (neg.f64 (fabs.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b b (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 a))) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b b (fabs.f64 a) (fabs.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b b (neg.f64 a) (neg.f64 a)) |
(134-z0z1z2z3z4 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) b b a a) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (-.f64 b a))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(/.f64 (*.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(/.f64 (neg.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale))) (neg.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(/.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (-.f64 b a) (+.f64 b a))) |
(/.f64 (neg.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (neg.f64 (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(/.f64 (neg.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale))) |
(/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))) |
(/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(-.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) (/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(+.f64 (/.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(+.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b)) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(+.f64 (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(+.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))) (-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64)))))) |
(sin.f64 (+.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) |
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) |
(-.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) |
(cos.f64 (neg.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64))))) |
(cos.f64 (fabs.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(cos.f64 (fabs.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) |
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(+.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))) |
(*.f64 y-scale (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (neg.f64 y-scale) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) y-scale)) |
(/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a))) (/.f64 (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (-.f64 b a))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(*.f64 (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (*.f64 (neg.f64 y-scale) (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (*.f64 (neg.f64 y-scale) (neg.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale))) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(/.f64 (*.f64 (neg.f64 y-scale) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(/.f64 (*.f64 (neg.f64 y-scale) (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)))) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(/.f64 (*.f64 y-scale (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 (-.f64 b a) (+.f64 b a)))) |
(/.f64 (*.f64 y-scale (neg.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(/.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 y-scale)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) (neg.f64 y-scale)) (*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (*.f64 (neg.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale)) y-scale) (*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (neg.f64 y-scale)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (neg.f64 y-scale)) (*.f64 (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) y-scale)) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) y-scale)) (neg.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) |
(/.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))) y-scale) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) |
(/.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))) |
(/.f64 (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) y-scale) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) |
(/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) |
(*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a)))))) |
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))) |
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) |
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))))) (neg.f64 (neg.f64 (PI.f64)))) |
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))))) |
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (PI.f64)) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (PI.f64))) |
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))))) (PI.f64)) |
| 853.0ms | 14 336× | 0 | valid |
Compiled 421 622 to 15 800 computations (96.3% saved)
ival-mult!: 212.0ms (76.4% of total)ival-sub!: 42.0ms (15.1% of total)adjust: 23.0ms (8.3% of total)102 alts after pruning (101 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 145 | 60 | 1 205 |
| Fresh | 26 | 41 | 67 |
| Picked | 5 | 0 | 5 |
| Done | -1 | 1 | 0 |
| Total | 1 175 | 102 | 1 277 |
| Status | Accuracy | Program |
|---|---|---|
| 32.8% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))))) (PI.f64)) | |
| 30.1% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64))))) (PI.f64)) | |
| 18.7% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) | |
| 11.5% | (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) | |
| 8.4% | (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) | |
| 13.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) | |
| 34.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (PI.f64))) | |
| 10.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) | |
| 18.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) | |
| 13.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) | |
| 19.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) | |
| 8.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) | |
| 28.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) | |
| 6.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 8.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 10.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) | |
| 12.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) | |
| 11.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) | |
| 11.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 7.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 27.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) | |
| 5.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) | |
| 38.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) | |
| 22.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 25.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 18.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) | |
| 28.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 45.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a))) (/.f64 (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (-.f64 b a)))))) (PI.f64))) | |
| 31.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 31.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 30.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64))) | |
| 30.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) y-scale))))) (PI.f64))) | |
| 29.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 31.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 23.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 30.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 20.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 24.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 41.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 23.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 33.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) | |
| 27.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 14.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 46.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 43.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 44.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) | |
| 35.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) | |
| 34.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) | |
| 44.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) | |
| 44.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale #s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64))) | |
| 46.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 49.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 45.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 46.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 46.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 46.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 46.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 46.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 44.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 39.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) | |
| ✓ | 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| 32.7% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))))))))) (PI.f64))) | |
| 42.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 43.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 43.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 46.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 41.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 42.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) | |
| 44.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) | |
| 42.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) | |
| 42.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) | |
| 35.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) | |
| 37.3% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) | |
| 39.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 6.9% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (PI.f64))) | |
| 6.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) | |
| 40.8% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) | |
| 11.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) | |
| 11.6% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) | |
| 27.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) | |
| 35.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) | |
| 11.0% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) | |
| 11.2% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) | |
| 40.4% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 35.1% | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) | |
| 32.8% | (*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64)))) | |
| 11.5% | (*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
Compiled 28 379 to 8 659 computations (69.5% saved)
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) y-scale))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale #s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) y-scale))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale #s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale x-scale))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale)))) (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
| Inputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (/.f64 (*.f64 #s(literal -90 binary64) x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) angle) (/.f64 x-scale (*.f64 (PI.f64) y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 #s(literal -90 binary64) (*.f64 angle y-scale)) (/.f64 x-scale (PI.f64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -90 binary64)))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (* a a) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (*.f64 #s(literal -1 binary64) (/.f64 y-scale (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) b) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) x-scale) (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) angle)))))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 #s(approx (- b a) (*.f64 #s(literal -1 binary64) a)) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 90 binary64) (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale #s(approx (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 (*.f64 (-.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) y-scale) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) angle) (/.f64 x-scale (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 x-scale angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (PI.f64))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a a) y-scale) (*.f64 x-scale x-scale)) (*.f64 y-scale (+.f64 (*.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 x-scale x-scale)) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) (*.f64 (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a)) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (-.f64 (*.f64 b b) (*.f64 a a))))) #s(literal 90 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (-.f64 b a))) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (+.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (PI.f64) angle))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fabs.f64 (-.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 b (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))))) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (/.f64 (*.f64 #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (*.f64 a a) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale)) x-scale) angle)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (pow.f64 b #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (+.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (PI.f64) angle) #s(approx (* (- b a) (+ b a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 #s(approx (- (pow a 2) (sqrt (pow a 4))) #s(literal 0 binary64)) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 x-scale (/.f64 (*.f64 #s(approx (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 angle (PI.f64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) #s(approx (/ (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 angle y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (* x-scale (/ (* (- (/ (* a a) (* y-scale y-scale)) (+ (fabs (- (/ (* b b) (* x-scale x-scale)) (/ (* a a) (* y-scale y-scale)))) (/ (* b b) (* x-scale x-scale)))) y-scale) (* (* (PI) angle) (* (- b a) (+ b a)))))) (*.f64 #s(literal -90 binary64) (/.f64 x-scale (*.f64 angle (log.f64 (pow.f64 (exp.f64 (PI.f64)) y-scale)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI))))) #s(literal 1/2 binary64))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (134-z0z1z2z3z4 (*.f64 x-scale y-scale) (/.f64 a y-scale) (/.f64 a y-scale) (+.f64 (*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64))))) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) y-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 #s(approx (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) x-scale))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) #s(approx (/ (* y-scale (+ (sqrt (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 y-scale (PI.f64)) x-scale)) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64)))))))) angle)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (/.f64 (-.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (pow.f64 a #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (sqrt.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale #s(approx (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (pow a 2) (pow y-scale 2)) (+ (sqrt (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)) (/ (pow b 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 #s(approx (* (* (* 1/180 angle) (PI)) 2) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 y-scale (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 y-scale (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (/.f64 y-scale (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 4 binary64)))) y-scale) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))))))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+.f64 (sqrt.f64 (pow.f64 b #s(literal 4 binary64))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 4)) (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) y-scale))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 4 binary64))) (pow.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 #s(approx (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) #s(approx (pow (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) 2) (pow.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale #s(approx (* (sin (+ (neg (* (* 1/180 angle) (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (cos.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (neg.f64 (PI.f64)))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (* 1/180 angle) (PI))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/11664000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale)) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64))))) (PI.f64)) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64)))) |
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 y-scale x-scale))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a)) (-.f64 b a))))) (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) x-scale)))) (PI.f64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64))))))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(approx (/ y-scale (cos (* (* 1/180 angle) (PI)))) (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a))) (/.f64 (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (-.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a)) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(approx (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) y-scale) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale)) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64)))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 y-scale (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 #s(approx (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 (/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (PI.f64)) #s(literal 180 binary64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(approx (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (sqrt.f64 (pow.f64 b #s(literal 4 binary64)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(approx (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64)) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (-.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 #s(approx (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) y-scale)) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 x-scale y-scale))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (sqrt.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 #s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 x-scale (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) x-scale)))) (*.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale)))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (+.f64 (sqrt.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 3 binary64)) (pow.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))) (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (*.f64 a a))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (*.f64 x-scale y-scale))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 #s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 #s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 #s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a) (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (neg.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (134-z0z1z2z3z4 (/.f64 #s(literal 1 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) a)) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 #s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 #s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 #s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 #s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))) y-scale) #s(literal 2 binary64))))) (/.f64 #s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (+ (fabs (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* 1/180 angle) (PI)))))) (* a a)))) x-scale) (/ y-scale (* (* (* (- b a) (+ b a)) (sin (* (* 1/180 angle) (PI)))) (cos (* (* 1/180 angle) (PI)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ (/ (+ (fabs (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) (+ (* (* (- 1/2 (* -1/2 (cos (* (* (* 1/180 angle) (PI)) 2)))) b) b) (* (* (- 1/2 (* (cos (* (* (* 1/180 angle) (PI)) 2)) 1/2)) a) a))) x-scale) (* (sin (* (* 1/180 angle) (PI))) (* (+ b a) (- b a)))) (/ y-scale (cos (* (* 1/180 angle) (PI))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 b (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) #s(literal 2 binary64)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 y-scale (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (/.f64 (*.f64 y-scale (*.f64 (+.f64 a (*.f64 #s(literal -1 binary64) a)) (+.f64 (fabs.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 a a)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 b b)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))))))) (*.f64 a a)))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (sqrt.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))))))))) (PI.f64))) |
| Outputs |
|---|
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) b) b) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) a) a))) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (+.f64 b a))) (/.f64 (/.f64 y-scale (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (-.f64 b a)))))) (PI.f64))) |
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* y-scale (+ (sqrt (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (/.f64 (*.f64 y-scale (+.f64 (sqrt.f64 (pow.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (sin.f64 (+.f64 (+.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) |
101 calls:
| 116.0ms | b |
| 64.0ms | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 62.0ms | (/.f64 angle #s(literal 180 binary64)) |
| 60.0ms | y-scale |
| 59.0ms | a |
| Accuracy | Segments | Branch |
|---|---|---|
| 11.5% | 1 | y-scale |
| 11.5% | 1 | a |
| 11.5% | 1 | (/.f64 angle #s(literal 180 binary64)) |
| 11.5% | 1 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 11.5% | 1 | (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
| 11.5% | 1 | (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
| 11.5% | 1 | (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
| 11.5% | 1 | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 11.5% | 1 | b |
| 11.5% | 1 | angle |
| 11.5% | 1 | x-scale |
| 35.5% | 1 | y-scale |
| 35.5% | 1 | b |
| 35.5% | 1 | (/.f64 angle #s(literal 180 binary64)) |
| 35.5% | 1 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 35.5% | 1 | angle |
| 35.5% | 1 | (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
| 35.5% | 1 | (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
| 35.5% | 1 | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 35.5% | 1 | (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
| 35.5% | 1 | a |
| 35.5% | 1 | x-scale |
| 37.3% | 1 | y-scale |
| 37.3% | 1 | (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
| 37.3% | 1 | (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
| 37.3% | 1 | (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
| 37.3% | 1 | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 37.3% | 1 | (/.f64 angle #s(literal 180 binary64)) |
| 37.3% | 1 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 37.3% | 1 | angle |
| 37.3% | 1 | x-scale |
| 37.3% | 1 | a |
| 37.3% | 1 | b |
| 40.8% | 2 | b |
| 38.6% | 1 | y-scale |
| 38.6% | 1 | x-scale |
| 38.6% | 1 | (/.f64 angle #s(literal 180 binary64)) |
| 38.6% | 1 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 38.6% | 1 | angle |
| 38.6% | 1 | (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
| 38.6% | 1 | (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
| 38.6% | 1 | (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
| 38.6% | 1 | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 40.3% | 2 | a |
| 43.0% | 3 | b |
| 45.1% | 3 | (/.f64 angle #s(literal 180 binary64)) |
| 45.1% | 3 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 45.1% | 3 | angle |
| 41.8% | 1 | x-scale |
| 41.8% | 1 | y-scale |
| 45.6% | 2 | b |
| 46.5% | 3 | a |
| 47.4% | 3 | (/.f64 angle #s(literal 180 binary64)) |
| 47.4% | 3 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 47.4% | 3 | angle |
| 46.4% | 2 | b |
| 48.2% | 2 | b |
| 47.7% | 2 | a |
| 49.4% | 4 | y-scale |
| 43.2% | 1 | (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
| 43.2% | 1 | (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
| 43.2% | 1 | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 48.2% | 2 | b |
| 43.2% | 1 | (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
| 50.9% | 5 | x-scale |
| 48.6% | 2 | a |
| 51.2% | 3 | a |
| 51.3% | 4 | (/.f64 angle #s(literal 180 binary64)) |
| 51.3% | 4 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 51.3% | 4 | angle |
| 52.4% | 4 | b |
| 51.8% | 3 | a |
| 50.6% | 2 | b |
| 52.2% | 3 | a |
| 51.7% | 2 | a |
| 51.9% | 2 | a |
| 51.9% | 2 | a |
| 49.1% | 2 | (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
| 49.1% | 2 | (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
| 49.1% | 2 | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 49.3% | 2 | (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
| 50.2% | 3 | y-scale |
| 52.6% | 4 | x-scale |
| 53.6% | 4 | (/.f64 angle #s(literal 180 binary64)) |
| 53.6% | 4 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 53.6% | 4 | angle |
| 51.9% | 2 | a |
| 52.5% | 3 | b |
| 56.1% | 3 | b |
| 56.8% | 3 | b |
| 57.0% | 4 | (/.f64 angle #s(literal 180 binary64)) |
| 57.0% | 4 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 52.4% | 2 | (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) |
| 52.0% | 2 | (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) |
| 52.0% | 2 | (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)) |
| 52.0% | 2 | (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))) |
| 54.5% | 2 | a |
| 58.6% | 3 | b |
| 57.0% | 4 | angle |
| 56.4% | 4 | x-scale |
| 57.7% | 5 | y-scale |
| 31.0ms | 521× | 0 | invalid |
| 27.0ms | 487× | 0 | valid |
| 2.0ms | 16× | 1 | valid |
Compiled 64 671 to 4 430 computations (93.1% saved)
ival-mult!: 14.0ms (75.3% of total)ival-sub!: 3.0ms (16.1% of total)adjust: 1.0ms (5.4% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 83.0ms | 4.641911756764833e+171 | 2.802157390465276e+172 |
| 41.0ms | 3.0297840626915155e-165 | 3.951035922871465e-165 |
| 44.0ms | 35× | 2 | valid |
| 41.0ms | 44× | 1 | valid |
| 20.0ms | 61× | 0 | valid |
| 7.0ms | 4× | 3 | valid |
Compiled 5 395 to 1 617 computations (70.0% saved)
ival-pow2: 25.0ms (26.0% of total)ival-cosu: 15.0ms (15.6% of total)ival-sinu: 14.0ms (14.5% of total)ival-div!: 14.0ms (14.5% of total)ival-mult!: 10.0ms (10.4% of total)adjust: 9.0ms (9.3% of total)ival-sqrt: 3.0ms (3.1% of total)ival-sub!: 3.0ms (3.1% of total)ival-add!: 2.0ms (2.1% of total)ival-atan: 2.0ms (2.1% of total)ival-pi: 0.0ms (0.0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 123.0ms | 7.27192660840508e+188 | 1.6510613211867124e+193 |
| 72.0ms | 4.597202899178404e-142 | 2.8810508112543685e-141 |
| 72.0ms | 122× | 0 | valid |
| 52.0ms | 62× | 1 | valid |
| 47.0ms | 36× | 2 | valid |
| 7.0ms | 4× | 3 | valid |
Compiled 8 628 to 2 611 computations (69.7% saved)
ival-mult!: 38.0ms (24.8% of total)ival-pow2: 37.0ms (24.1% of total)ival-cosu: 20.0ms (13.0% of total)ival-sinu: 18.0ms (11.7% of total)ival-div!: 14.0ms (9.1% of total)adjust: 13.0ms (8.5% of total)ival-sqrt: 4.0ms (2.6% of total)ival-sub!: 4.0ms (2.6% of total)ival-add!: 3.0ms (2.0% of total)ival-atan: 3.0ms (2.0% of total)ival-pi: 0.0ms (0.0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 95.0ms | 2.4521414679239767e+101 | 6.81392481157013e+102 |
| 4.0ms | 4.597202899178404e-142 | 2.8810508112543685e-141 |
| 35.0ms | 26× | 2 | valid |
| 31.0ms | 32× | 1 | valid |
| 17.0ms | 52× | 0 | valid |
| 3.0ms | 2× | 3 | valid |
Compiled 7 883 to 2 416 computations (69.4% saved)
ival-pow2: 18.0ms (24.4% of total)ival-cosu: 13.0ms (17.6% of total)ival-sinu: 9.0ms (12.2% of total)ival-mult!: 9.0ms (12.2% of total)ival-div!: 8.0ms (10.8% of total)adjust: 7.0ms (9.5% of total)ival-sub!: 6.0ms (8.1% of total)ival-sqrt: 2.0ms (2.7% of total)ival-add!: 2.0ms (2.7% of total)ival-atan: 2.0ms (2.7% of total)ival-pi: 0.0ms (0.0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 117.0ms | 5.4551458572169205e+135 | 2.9634960703495728e+150 |
| 43.0ms | 51× | 1 | valid |
| 32.0ms | 90× | 0 | valid |
| 23.0ms | 18× | 2 | valid |
| 2.0ms | 1× | 3 | valid |
Compiled 6 132 to 1 991 computations (67.5% saved)
ival-pow2: 23.0ms (27.5% of total)ival-cosu: 13.0ms (15.6% of total)ival-sinu: 11.0ms (13.2% of total)ival-div!: 11.0ms (13.2% of total)ival-mult!: 9.0ms (10.8% of total)adjust: 7.0ms (8.4% of total)ival-sub!: 4.0ms (4.8% of total)ival-sqrt: 2.0ms (2.4% of total)ival-add!: 2.0ms (2.4% of total)ival-atan: 2.0ms (2.4% of total)ival-pi: 0.0ms (0.0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 10.0ms | 5.4551458572169205e+135 | 2.9634960703495728e+150 |
Compiled 6 122 to 1 981 computations (67.6% saved)
| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 7.0ms | 5.4551458572169205e+135 | 2.9634960703495728e+150 |
Compiled 6 082 to 1 961 computations (67.8% saved)
| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 7.0ms | 5.4551458572169205e+135 | 2.9634960703495728e+150 |
Compiled 6 032 to 1 971 computations (67.3% saved)
| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 88.0ms | 5.4551458572169205e+135 | 2.9634960703495728e+150 |
| 51.0ms | 1.2766345492073665e-202 | 1.9429468327629004e-202 |
| 40.0ms | 42× | 1 | valid |
| 34.0ms | 27× | 2 | valid |
| 33.0ms | 100× | 0 | valid |
| 13.0ms | 7× | 3 | valid |
Compiled 8 358 to 2 621 computations (68.6% saved)
ival-pow2: 27.0ms (27.5% of total)ival-cosu: 16.0ms (16.3% of total)ival-sinu: 13.0ms (13.3% of total)ival-div!: 11.0ms (11.2% of total)ival-mult!: 11.0ms (11.2% of total)adjust: 9.0ms (9.2% of total)ival-sqrt: 3.0ms (3.1% of total)ival-sub!: 3.0ms (3.1% of total)ival-add!: 3.0ms (3.1% of total)ival-atan: 2.0ms (2.0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 52.0ms | 5.4551458572169205e+135 | 2.9634960703495728e+150 |
| 3.0ms | 1.2766345492073665e-202 | 1.9429468327629004e-202 |
| 20.0ms | 42× | 0 | valid |
| 13.0ms | 11× | 2 | valid |
| 10.0ms | 11× | 1 | valid |
Compiled 8 358 to 2 663 computations (68.1% saved)
ival-pow2: 9.0ms (27.5% of total)ival-sinu: 4.0ms (12.2% of total)ival-div!: 4.0ms (12.2% of total)ival-cosu: 4.0ms (12.2% of total)ival-mult!: 4.0ms (12.2% of total)adjust: 3.0ms (9.2% of total)ival-sub!: 2.0ms (6.1% of total)ival-sqrt: 1.0ms (3.1% of total)ival-add!: 1.0ms (3.1% of total)ival-atan: 1.0ms (3.1% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 77.0ms | 2.313484358710547e+85 | 9.491721185998655e+85 |
| 40.0ms | 1.2766345492073665e-202 | 1.9429468327629004e-202 |
| 38.0ms | 24× | 2 | valid |
| 33.0ms | 37× | 1 | valid |
| 26.0ms | 78× | 0 | valid |
| 9.0ms | 5× | 3 | valid |
Compiled 6 054 to 1 851 computations (69.4% saved)
ival-pow2: 23.0ms (25.7% of total)ival-sinu: 18.0ms (20.1% of total)ival-cosu: 12.0ms (13.4% of total)ival-div!: 9.0ms (10.1% of total)ival-mult!: 9.0ms (10.1% of total)adjust: 7.0ms (7.8% of total)ival-sqrt: 4.0ms (4.5% of total)ival-sub!: 3.0ms (3.4% of total)ival-add!: 2.0ms (2.2% of total)ival-atan: 2.0ms (2.2% of total)ival-pi: 0.0ms (0.0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 119.0ms | 6.280179784610289e+76 | 1.5776882862595136e+82 |
| 42.0ms | 31× | 2 | valid |
| 40.0ms | 43× | 1 | valid |
| 22.0ms | 68× | 0 | valid |
| 3.0ms | 2× | 3 | valid |
Compiled 5 338 to 1 761 computations (67.0% saved)
ival-pow2: 24.0ms (26.1% of total)ival-cosu: 15.0ms (16.3% of total)ival-div!: 14.0ms (15.2% of total)ival-sinu: 13.0ms (14.1% of total)ival-mult!: 9.0ms (9.8% of total)adjust: 8.0ms (8.7% of total)ival-sub!: 3.0ms (3.3% of total)ival-sqrt: 2.0ms (2.2% of total)ival-add!: 2.0ms (2.2% of total)ival-atan: 2.0ms (2.2% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 8.0ms | 4.597202899178404e-142 | 2.8810508112543685e-141 |
Compiled 3 700 to 1 125 computations (69.6% saved)
| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 96.0ms | 1.5088786669536932e+116 | 6.2134786109679215e+119 |
| 34.0ms | 40× | 1 | valid |
| 28.0ms | 21× | 2 | valid |
| 22.0ms | 66× | 0 | valid |
| 2.0ms | 1× | 3 | valid |
Compiled 4 460 to 1 379 computations (69.1% saved)
ival-pow2: 19.0ms (26.0% of total)ival-cosu: 11.0ms (15.0% of total)ival-sinu: 10.0ms (13.7% of total)ival-div!: 10.0ms (13.7% of total)adjust: 8.0ms (10.9% of total)ival-mult!: 8.0ms (10.9% of total)ival-sqrt: 2.0ms (2.7% of total)ival-sub!: 2.0ms (2.7% of total)ival-add!: 2.0ms (2.7% of total)ival-atan: 1.0ms (1.4% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 93.0ms | 2.8368869020799253e-161 | 5.573470636073255e-160 |
| 29.0ms | 24× | 2 | valid |
| 28.0ms | 31× | 1 | valid |
| 21.0ms | 54× | 0 | valid |
| 7.0ms | 3× | 3 | valid |
Compiled 3 833 to 1 185 computations (69.1% saved)
ival-pow2: 25.0ms (34.6% of total)ival-cosu: 10.0ms (13.9% of total)ival-sinu: 9.0ms (12.5% of total)ival-div!: 7.0ms (9.7% of total)ival-mult!: 7.0ms (9.7% of total)adjust: 6.0ms (8.3% of total)ival-sqrt: 2.0ms (2.8% of total)ival-sub!: 2.0ms (2.8% of total)ival-add!: 2.0ms (2.8% of total)ival-atan: 1.0ms (1.4% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 85.0ms | 3.0057675830857003e+94 | 3.5433810571418084e+96 |
| 59.0ms | 3.951035922871465e-165 | 1.1971995792866868e-164 |
| 57.0ms | 62× | 1 | valid |
| 37.0ms | 27× | 2 | valid |
| 33.0ms | 101× | 0 | valid |
| 3.0ms | 2× | 3 | valid |
Compiled 6 329 to 2 008 computations (68.3% saved)
ival-pow2: 28.0ms (25.5% of total)ival-sinu: 18.0ms (16.4% of total)ival-cosu: 17.0ms (15.5% of total)ival-mult!: 15.0ms (13.6% of total)ival-div!: 12.0ms (10.9% of total)adjust: 9.0ms (8.2% of total)ival-sub!: 4.0ms (3.6% of total)ival-sqrt: 3.0ms (2.7% of total)ival-add!: 3.0ms (2.7% of total)ival-atan: 2.0ms (1.8% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 85.0ms | 7.918359095329663e+150 | 2.6541773752157613e+152 |
| 35.0ms | 42× | 1 | valid |
| 25.0ms | 19× | 2 | valid |
| 17.0ms | 51× | 0 | valid |
Compiled 3 889 to 1 178 computations (69.7% saved)
ival-pow2: 18.0ms (27.5% of total)ival-cosu: 10.0ms (15.3% of total)ival-sinu: 8.0ms (12.2% of total)ival-div!: 7.0ms (10.7% of total)ival-mult!: 7.0ms (10.7% of total)adjust: 6.0ms (9.2% of total)ival-sub!: 5.0ms (7.6% of total)ival-sqrt: 2.0ms (3.1% of total)ival-add!: 2.0ms (3.1% of total)ival-atan: 1.0ms (1.5% of total)ival-pi: 0.0ms (0.0% of total)| 1× | fuel |
Compiled 12 077 to 506 computations (95.8% saved)
Compiled 83 612 to 14 793 computations (82.3% saved)
Loading profile data...